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Preparado para todos aquellos moriitores con entrada RGB LINEAL 
0 video compuesto: AMSTRAD, COMMODORE, PHILIPS, HANTARF.X, etc. 
Convierte cualquier monitor en color con 
entrada RGB-LINEAL o PAL en una T.V. 
color de alia calidad de imagen. De un 
manejo muy sencillo, no es necesario 
efectuar ninguna modificacidn eri el 
monitor. Su uso no produce deterioro ni 
alteracion alguna en el funcionamiento 
del monitor y su diseno le hace 
perfectamente acoplable debajo del 
rnismo. 


eomeiamos 
eon ftts ideas 


ESPECIFICACIONES: 

3 bandas 

Presintonla de 8 canales 

Salida RGB-LINEAL 

Entrada y salida de video 

Entrada y salida de audio 

Amplificador de sonido y altavoz incorporados 
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Serie Oro 

Con este programa podras disputar 
partidas de ajedrez, con todas las 
posibilidades que Ios ordenadores 
desarrollan. 




Contabilidad 


Una de las facetas del campo 
profesionaldonde Ios ordenadores tienen 
mas que decir , es la de la contabilidad. En 
esta ocasion hemos puesto a prueba un 
nuevo paquete. 


Introduccion 
al Pascal 

El lenguaje Pascal esta considerado 
como el lenguaje de la pedagogla. 
Desfinado para desarrollar en el 
programador una mente estructurada y 
logica, ha pasado a ser en Ios ultimos anos 
uno de Ios lenguajes mas eficientes como 
instrumenfo de desarrollo. 



Asi se 
hace un 
ajedrez 



Cucal 



Un juego donde la velocidad de nuestros 
dedos y nuestia habiliJad serdn 
instrumentos indispensables para acabar 
con la plaga de cucarachas. 


Batman 

Analizamos uno de Ios pnmeros juegos 
desarrollados para PCW, se trata de un 
clasico en la tecnica filmarion: Batman. 

A traves del texto encontraras como 
sortear muchos de Ios peligros que rondan 
al valeroso murcielago. 




Uno de Ios tipos de programas que mas 
asombro causan en el usuario son Ios que 
juegan a I ajedrez. A traves de las pdginas 
de este exfenso articulo descubriras Ios 
secretos que se esconden bajo este fipo de 
programas. 



Poke 

Especial 


Seguramente muchos de Ios juegos que 
compraste quedaron aparte de 
inacabados, perdidos en un cajon. Ahora 
es el momenfo de desempolvarlos y 
disfrutar con sana y sangre fria de una 
terrible venganza. 



Mrs . 
Joystick 


Uno de Ios ultimos 
productos de Erbe, se 
trata de Avenger, un 
juego donde se ponen 
a prueba todas 
nuestras habilidades. 












































JUEGA AL 

AJEDREZ 


Presentamos en esta ocasion el clasico juego del 
aiedrez parajugar entre dos personas, el 
ordenador lo unico que hace es controlar los 
movimientos que realizan los jugadores. 



as instrucciones de 
manejo del programa son muy 
senci'las, ya que es totalmente 
autoexplicativo, no obstante, ahi van 
algunas breves notas sobre su manejo. 

Despues de mover una pieza no 
se puede volver atrds. 


VARIABLES 

JUGADA$ () Table de 500 elemenfos que 
contendra las jugadas 
realizadas para poder ver la 
partida despues de acabarla. 

() 

labia de dxd, indica donde 
se encuentran colocadas las 
piezas en el tablero. 

A$ 

Coordenada horizontal de la 
pieza que se va a mover. 

B$ 

Coordenada vertical de la 
pieza que se va a mover. 

c$ 

Coordenada horizontal de la 
casilla donde se va a mover. 

D$ 

Coordenada vertical de la 
casilla donde se va a mover. 

TNI, TND, 

TBI, TBD, 

REYN,REYB 

Cuando alguno de estos flag 
se pone a 1, Indica que no 
se puede hacer el enroque 
con esa ficha. 

IS 

Cuadro bianco. 

X$ 

Cuadro neqro. 

T$, P$, AL$, 

CA$, R$, 

RN$ 

Contienen las figuras, torre, 
peon, alfil, cabailo, rey y 
reina respectivamente. 

PP 

Puntero de la tabla 

JUGADA$(). 

REPETICION 

Si esta a 1, indica que se 
estd viendo la partida 
repetida y no mete la jugoda 
en la tabla JUGADA$(). 

JUGADOR 

Jugador al que le toca 
mover. 

FICHA$ 

Color de las piezas que 
tienen que mover. 


Si le hemos dicho la pieza que 
ueremos mover, pero no el 
estino, podemos volver atras 
ddndole una jugado incorrecta. 

Para hacer el enroque basta 
con darle la posicion del rey y la 
casilla que va a ocupar. Para el 
rey bianco seria: 

Desde E8 hasta G8: enroque 
corto. 

Desde E8 hasta C8: enroque 
largo. 

En la Ifnea 1800 estan puestos 
los colores, puse esos porque en 
el monitor verde se ven mejor, 
para el de color poner los colores 
que querais. 



118 CLEARrDEFINT A-2:G0SUB 1318:0111 J 
UGADA$(508):JUGADOR=2:PEN 1 
128 LOCATE 4,4:PRINT RELOCATE 10,4:P 
RINT TI:L0CATE 14,4:PRINT CA4:L0CATE 
22,4:PRINT AL4:LOCATE 28,4:PRINT Ri:l 
OCATE 34,4:PRINT RN4 
125 LOCATE 12,25:PRINT CHR4(144)+' ER 
ZUR1 1984' 

138 LOCATE 4,2:PRINT'A J E D R E 2 
(2 JUGADORES) 

140 HOME 144,158:DRFU 144,240:DRAW 4? 
4,248:DRAW 494,158:DRAW 144,158;L0CA1 
E 11,12 iPRINT" 1.- INSTRUCCIONES' :L0CA 
TE 11,14:PRINT'2.- EMPEZAR EL JUEGO" 
158 A4=INKEY4:IF A4='i' THEN GOSUB 29 
10 ELSE IF A4=*2* THEN 140 ELSE 158 
140 CLS:60SUB 1898 

178 Ht(l,1)=*TN':R4(2,1)='CN*:H$(3,1) 
= i "AN": H>( 4,1 )=’ RfH": H4 (5,1 )= 1 RN‘: 
,1)=H4(3,1):K4(7,1)=H4<2,1):H4(8,1)=H 
4(1,1):F0R 1=1 TO 8:H$(I,2)='PN*:NEXT 
188 FOR 1=1 TO 8:H4(1,?)= , PB , :NEXT:1» 
<1,8)='TB':H4<2,8)='CB':H$<3,8)='AB'; 
Ht(4 ( 8)='ra^B':H4(5,8)='RB':K$(4,8)=ltf 
(3,8):H4(?,8)=H4(2,8):H4(8,8)=ttl(l,8) 
:PEN 1:LOCATE 28,1iPRINT'LETRA.NUNERO 
LOCATE 27,24:PRINT'2 PARA ACABAR* 
190 PEN 1:IF JUGAD0R=1 THEN JUGA0QR=2 
:F1CHA4="NE6RAS' ELSE JUGAD0R=1 :F1CIA 
4="BLANCAS' 

288 PRINT CHR$(22);CHR$(0) .-LOCATE 39, 
21:PRINT* 'iLOCATE 34,4:PR1NT' ':L 

OCATE 34,5:PR1NT' ' 

218 LOCATE 29,20:PR1N7'JUGADOR:';JUGA 
00R:L0CATE 27,21:PRINT‘MU£VEN ' ;FICHA 
4:PRINT CHR$(22);CHR$(1):L0CATE 28,4: 


LETOAjNUMERO 




BLAHCi 
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PRINT 1 DESDEiijA$= INKEYi: 1F A$=" THEN 
218 

228 A$=UPPER*(A*):1F AM'Z* THEN 2228 
ELSE IF A$<'A’ OR AO’H 1 THEN 218 
238 IF A$=‘A' THEN A=1 ELSE IF A$='B' 
THEN A=2 ELSE IF A^’C THEN A=3 ELS 
E IF A8="D‘ THEN A=4 ELSE IF A*=’E* T 
HEN A=5 ELSE IF A*='F* THEN ft=4 ELSE 
IF A$='G' THEN A=? ELSE IF A*=‘H’ THE 
N A=8 


C=4 ELSE IF C$=‘6‘ THEN 0=7 ELSE IF 
C$=*H‘ THEN C=8 

338 IF H$(A,B)="PB’ OR f»(A l B)= , PN’ T 
HEN 358 ELSE IF HKA.B^'TB' OR K$<A, 
B)='TN* THEN 598 ELSE IF H$(A,B)= , AB 1 
OR HKAjB^'AN" THEN 778 ELSE IF H*< 
A,B)=’CB' OR H$(A,B) =, CN‘ THEN 1158 
348 IF HKA.B^’RB' OR Hi(A,B) =, RN’ T 
HEN 988 ELSE IF H$(A,B)=*RNB* OR K*(A 
,B)=’RM4‘ THEN 948 



248 LOCATE 34,4:PRINT A4jV:B$=1NKEY 
*:1F W=" THEN 248 
258 IF B$<'1‘ OR W>*8 1 ' THEN 248 ELSE 
LOCATE 34,4:PRINT K 
248 B=VAL(B$):IF RIGHTi(K*(A,B> ,1)=" 
THEN 278 ELSE 288 

276 PRINT CHR*<7):LOCATE 29,14:PRJNT* 
IMPOSIBLE’ :Al=lNKEYf: IF A$=" THEN 27 
8 ELSE PRINT CHRIC22)jCHR$(8):LOCATE 
29,14:PR1NT STRIN6$(18,“ '):LOCATE 34 
^iPRINT" ":LOCATE 34,5:PR1NT* ■: 

PRINT CHRIC22);CHRi(l):GOTO 218 
288 IF <JUGADQR=1 AND RIGHT$(HI(A,B), 
1)=*N‘) OR (JUGA00R=2 AND R16HH(H*(A 
) B),1)= , B , ) THEN 278 
296 LOCATE 28,5:PR1NT'I^STA:’ :C$=1NKE 
Y$:IF C*=" THEN 290 
386 C*=UPPER*<C*):IF MC'A 1 OR «>'«• 
THEN 298 ELSE LOCATE 34,5:PRINT C*;’ 

I 

318 D$=1NKEY$:1F WPT OR DO'B* THE 
N 318 ELSE LOCATE 34,5:PR1NT D* 

328 D=VAL(W):1F C^'A* THEN C=1 ELSE 
IF C^B 1 THEN C=2 ELSE IF C*=‘C’ TH 
EN 0=3 ELSE IF C*=’D* THEN C=4 ELSE I 
F C^'E' THEN C=5 ELSE IF W^F' THEN 


358 '**»** PEON ***** 

348 IF A=C THEN 376 ELSE 438:'AUANZAR 
Y COMER 

378 IF B)D WD tN(A,B)= , PN’ THEN 276: 
W PUEDEN IR PARA ATRAS LAS NEGRAS 
388 IF D)B AND H$(A,B)= , PB > THEN 278: 
'NO PUEDEN IR PARA ATRAS LAS BLANCAS 
398 IF (B-2)D AND HKA.B^'PB 1 ) OR (D 
-B>2 WD WCA.B^'PN") THEN 278 
488 IF <B-D=2 AND H$(A,B)= , PB" AND 8< 
>7) OR (D-B=2 AND W(A,B)= , PN’ AND B< 
>2) THEN 278 

418 IF <B*1=D OR B-1=D) AND H$<C,DM> 
" THEN 278 
428 GOTO 588 

438 IF A-1=C OR A*1=C THEN 448 ELSE 2 
76 

448 IF <A-1=C OR A*1=C) AND Ht(C,D)=- 
• THEN 278 

458 IF (A-1=C OR A+1=C) AND Hi(A,B)=’ 
PB' AND RI6HT$<HfCC,D), 1)O’N* THEN 2 
78 

448 IF (A-1=C OR A+1=C) AND H*(A,B)=" 
PN’ AND RIGHT^HKC^l.DO’B 1 THEN 2 
78 

478 IF 8-l=D OR B+1=D THEN 488 ELSE 2 


78 

488 IF H$(A,B)= , PB‘ AND RIGHH(W(C,D 
) (DO'N* THEN 588 

498 IF Hi(A,B)= , PN‘ AND RIGHT$(H*(C,D 
)jDO'B* THEN 278 

586 GOSUB 2488:IF SU=1 THEN SU=8:G0TQ 
278 ELSE GOSUB 1978 
518 IF SM=2 THEN SW=0sBORDER 1,7 ELSE 
538 

528 A*=INKEY*:1F A$=” THEN 528 ELSE 
BORDER 1:PRINT CHR*<22);CHR*(8):LOCAT 
E 31,14:PRINT* 

538 IF D=1 THEN 548 ELSE IF D=8 THEN 
558 ELSE 588:'CAMBIAM0S UN PEON POR U 
M DANA 

548 IF C=1 OR C=3 OR C=5 OR C=7 THEN 
PEN 2:GOTO 548 ELSE PEN 8:G0T0 548 
558 IF C=1 OR C=3 OR C=5 OR 0=7 THEN 
PEN 8:G0T0 578 ELSE PEN 2:G0T0 578 
548 LOCATE C+C+C-2,D+D-*D-2:PRINT Z*:P 
EN 1:L0CATE C*C*C-2,D+D*D-2:PR1NT RNI 
:W(C,D)= , RNB’:GOTO 588 
578 LOCATE C*C+C-2,D*D*0-2:PR1NT Z$:L 
OCATE C*C*C-2,D*D*D-2:PEN 3:PRINT RN* 
:H$(C,D)= , R^fl , 

588 GOTO 198 

598 '***** TORRE ***** 

488 IF A=C THEN 418 ELSE IF B=D THEN 
718 ELSE 270:'MOUIM1ENT0 VERTICAL Y H 
ORIZONTAL 

418 IF B<D THEN 428 ELSE 446 
428 FOR 1=B+1 TO 0-1 :IF H1(C,1)0‘’ T 
HEN 278 ELSE NEXT:IF (Hf(A,B)= , TB* OR 
HI(A,B)= , RB* OR H$<A,B)=’RN8‘) AND R 
IGHT$(H$(C,D),1)=’B' THEN 276 
438 FOR 1=8*1 TO 0-1 :IF Hi(C,I)<>" T 
HEN 276 ELSE NEXT:1F (Hi<A,B)='TN‘ OR 
H$(A,B)=‘RN' OR H$<A,B) =, RM4’) AND R 
I6HT^<HS<C,D), 1 ) =,, N* THEN 278 ELSE 44 
8 

448 FOR 1=0+1 TO B-l :IF HKC.DO" T 
HEN 270 ELSE NEXT:IF UHCA.B^'TB 1 OR 
H$(A,B)=*RB' OR H$(A,B)=‘RNB‘) AND R 
I6HT^<K$<C,D),1)=*B* THEN 278 
458 FOR 1=D+1 TO B-l :IF H*(C,I)<>" T 
HEN 278 ELSE NEXT:IF OWA.B^"!^ OR 
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H*(A,B)=*!W OR Hi(A,B)='RNN") AND R 
lGHT$(Kf<C,D),1)=“N* THEN 278 
448 60SUB 2480:IF SOI THEN SU=8:60T0 
270 ELSE GOSUB 1970 
478 IF SW=2 THEN SW=8:BORDER 1,7 ELSE 
696 

686 A*=INKEY*:IF A*=" THEN 688 ELSE 
BORDER 1:PRINT CHR*<22);CHR*<8):LQCAT 
E 31,14SPRINT* 

498 IF A=8 AND B=8 THEN TBD=1 ELSE IF 
A=1 AND B=8 THEN TBI=1 ELSE IF A=1 A 
ND Bs=l THEN TNI=1 ELSE TNC>=1 
788 GOTO 198 

718 IF A<C THEN 720 ELSE 748 
728 FOR 1=A+1 TO C-lsIF KKI.DX)” T 
HEN 278 ELSE NEXT:IF CHXA.BX'TB 1 OR 
H*(A,B)=*R8" OR H*<A,B) =, RNB') AND R 
THEN 278 



738 FOR I=A+1 TO C-lsIF H»<IjOIO" T 
HEN 278 ELSE NEXT:IF <H*<A,B)=*TN' OR 
H*<A,B)='RN* OR K*(A,B)= , RNN') AND R 
IGKT*<H*<C,D),1)=*N* THEN 278 ELSE 76 

8 

748 FOR 1=01 TO A-1:IF HfU.DX)" T 
HEN 278 ELSE NEXT:IF <Ht(A,B)="TN‘ OR 
H*(A,8)=‘RN* OR H*(A,B)='RNN') AND R 
IGHTI(H*(C,D),1)=^' THEN 278 
758 FOR 1=C+1 TO A-l:IF H*<I,DX>" T 
HEN 278 ELSE NEXT:IF (H*(A,B)= , TB* OR 
H1(A,B) =, RB' OR H*(A,B)='RNB') AND R 
I6HT*(K*(C,D) THEN 278 
768 GOTO 668 
770 'mu ALFIL ***** 

788 X=ABS(A-C):Y=ABS<B-D):IF XOY THE 
N 278 ELSE X=A:Y=B 

798 IF A<C AND B<D THEN 808 ELSE IF A 
>C AND B<D THEN 830 ELSE IF A>C AND B 
)D THEN 840 ELSE IF A<C WO B>D THEN 
898 ELSE 270 

888 X=X*1:Y=Y41:1F X=C THEN 818 ELSE 
IF HtCX.YX)" THEN 278 ELSE 880 
818 IF (H*<A,B)= , AB' OR H»<A,B)=*RB" 
OR H*(A,B)='RNB’) AND R1GHT*(H*(C,D), 
1)='B' THEN 278 

828 IF (H*<A,B) =, AN" OR HJCA.BO'RN 1 
OR H*(A,B)= , RW’) AND R1GKT*(H*(C,D), 
10'N' THEN 270 ELSE 928 


830 X=X-l:Y=Y4l:IF X=C THEN 840 ELSE 
IF H*<X,YX>" THEN 278 ELSE 838 
848 IF (HilA.B^’AB' OR Hf<A,B)= , RB‘ 
OR H*(A,B)="RNB') PHD R16NT*(H*<C,D>, 
1)='B" THEN 278 

858 IF <H*<A,B)= , AN* OR H*(A,B)="RN* 
OR KKA.BO'RW’) AND R16KT*(H$<C,D), 
1)=-N" THEN 278 ELSE 928 
848 X=X-1:Y=Y-1:1F X=C THEN 870 ELSE 
IF HS<X,YX>" THEN 278 ELSE 868 
878 IF (H*(A,B)=’AB' OR H*(A,B)= , RB’ 
OR H*<A,B)='RNB") AND RIGHT*(H*(C,D), 
1)='B” THEN 270 

888 IF (H*(A,B)='AN' OR H4XA,B)= , RN" 
OR H*(A,B)='W) AND RI6HT*(K*<C,D), 
lO'N" THEN 270 ELSE 928 
898 X=X4l:Y=Y-1:IF X=C THEN 908 ELSE 
IF H*(X,YX>" THEN 278 ELSE 898 
980 IF (H*<A,B) =, AB* OR H*(A,B)= , RB , 
OR H*(A,B) =, RNB") AND R3GKT*(H*<C,D), 
1)="B" THEN 270 

918 IF «H*(A,B)='AN' OR H*(A,B)= , RN" 
OR H*<A,B)= , RTW') AND RI6HT*<H*(C,D), 
1)=^' THEN 278 

920 GOSUB 2488:IF SOI THEN SO0:6OTO 
278 ELSE GOSUB 1978 
938 IF S02 THEN SOB: BORDER 1,7 ELSE 
958 

948 A*=INKEY*:IF At=" THEN 940 ELSE 
BORDER 1:PRINT CHR*(22)iCHR*(0):LOCAT 
E 31,14iPRINT" 

958 GOTO 198 

960 ' 4444 * REINA *4444 
978 IF A=C OR OO THEN 598 ELSE 778 
988 '44444 REY * 4*44 
998 IF <A=5 AND B=8 MD 03 AND D=8)0 
R<A=5 AND B=8 AND C=? AND D=8)OR<A=5 
AND Ol AND 03 AND D=1)0R(A=5 AND O 
1 AND 07 AND D=l) THEN 1908 ELSE 112 
8 

1888 GOSUB 2480:IF SU=1 THEN SOB: 601 
0 278 


yv 



1818 IF SW=2 THEN SO8;B0RDER 1,7 ELS 
E 1038 

1828 A*=1NKEY*:IF A*=" THEN 1828 ELS 
E BORDER 1:PRINT CHR*<22);CHR*<8):LOC 
ATE 31,14:PR1NT* 

1838 IF A=5 AND 08 AND 03 AND 08 A 


ND REYO0 AND TB1=8 AND H*<2,8)=" AN 
D H*<3,8>=" AND H*(4,8)=" THEN 1108 
: ENROQUE LARGO DE BLANCAS 
1848 IF A=5 AND Ol AND 03 AND Ol A 
ND REYN=8 AND TN1=8 AND Hid,!)*" AN 
D K*(3,l)=" AND H*(4,l)=" THEN 1888 
ENROQUE LARGO DE NEGRAS 
1858 IF A=5 AND OB AND 07 AND 08 A 
ND REYO0 AND TBOB AND H*(7,8)=" AN 
D (**<6,8)='■ THEN 1890:'ENRO6UE CORTO 
DE BLANCAS 

I860 IF APS (ND Ol AND 07 AND Ol A 
ND REYO0 ANO TNOB AND H*(7,l)=" AN 
D H*(4,l)=" THEN 1118:'ENROQUE CORTO 
DE NEGRAS 
1878 GOTO 278 
1088 TNJ=1:REYN=1:PEN 2:L0CATE 13,1:P 
RINT Z*:LOCATE 1,1:PRINT Z*:PEN 3:L0C 
ATE 7,1 :PR1NT RELOCATE 18,1 :PRINT T* 
:H*(4,1)=H*(1,1):H*(3,1)=H*(5,1):H*(1 
,1)=" :H*(5,1)= ,, :G0T0 198 
1898 TB01:REY01:PEN 0:LOCATE 13,22: 
PRINT Z*:PEN 1:LOCATE 19,22:PR1NT R*: 
PEN 2:LOCATE 22,22:PRINT Z*:PEN 1:L0C 
ATE 14,22:PR1NT T*:H*(7,8)=H*(5,8):H* 
(6,8)=H*(8 I 8):H*(5,8)=" , :K*(8,8)= ,, :G 
OTO 198 

1108 TBI=1:REY01:PEN 8:L0CATE 13,22: 
PRINT Z*:LOCATE 1,22:PRINT Z*:PEN 1 :L 
OCATE 7,22:PRINT R*:LOCATE 18,22:PR1N 
T T*:H*(4,8)=H*(1,8):H*(3,8)=H*(5,8): 
H*(1,8)= , *:H1(5,8)=":G0T0 198 
1118 TNOl :REYN=1 :PEN 2:L0CATE 13,1:P 
RINT Z*:PEN 3:L0CATE 19,1:PRINT R*:PE 
N 8:LOCATE 22,1:PRINT Z*:P£N 3:L0CATE 
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16,1 SPRINT T*:M<7,i)=H*(5,l):Kt<4,l 
)=Kf(8,l):H$(5,l)=* , :Hi(8,l)= , *:GQT0 
198 

1128 X=ABS(A-C):Y=ABS(B-D):LOCATE 27, 
12:1F X>1 OR Y>1 THEN 278 
1138 IF 8=1 THEN REYtt=l ELSE REYB=1 
1140 IF AfC OR B=D THEN 590 ELSE 778 
1150 'OH* CABALLQ ***** 

1148 IF A-1=C AND 8-2=D THEN 1250 
1176 IF A-2=C AND B-1=D THEN 1250 
1180 IF A-2=C AND B+1=D THEN 1258 
1198 IF A-1=C AND B+2=D THEN 1258 
1288 IF A+1=C AND B*2=D THEN 1258 
1210 IF A*2=C AND B+1=D THEN 1258 
1220 IF A+2=C AND B-1=D THEN 1258 
1238 IF A+1=C AND B-2=D THEN 1258 
1248 GOTO 278 

1258 IF H0(A,B)='CB' AND RI6KT$<W(C, 
D), 1 )=*B“ THEN 278 

1268 IF H0(A,B)= , CN* AND RIGHT$(Hi(C, 
D), 1)="N* THEN 270 

1278 GOSUB 2408:IF SU=1 THEN SU=0:GDT 
0 278 ELSE GOSUB 1978 
1288 IF SW=2 THEN SU=8:BORDER 1,7 ELS 
E 1368 

1298 A1=INKEY*:IF A$=“ THEN 1298 ELS 

E BORDER 1:PRINT CHf»(22) ;CHR*<8) :LOC 

ATE 31,14:PRINT- 

1388 GOTO 190 

1318 SYMBOL AFTER 144 

1320 SYMBOL 144,8,7,7,7,7,7,4,3 

1338 SYMBOL 145,0,60,40,68,255,255,0, 

255 

1348 SYMBOL 144,0,224,224,224,224,224 
,32,192 


1358 

SYMBOL 

147,1,1,1,1,1,1,1,1 

1368 

SYMBOL 

148,255,0,255,255,255,255 

,255, 

,255 


1378 

SYMBOL 

149,128,128,128,128,128,1 

28,128,128 


1380 

SYMBOL 

158,1,1,1,3,7,8,15,0 

1390 

SYMBOL 

151,255,255,8,255,255,8,2 

55,8 



1480 

SYMBOL 

152,128,128,128,192,224,1 

4,240 


1418 

SYMBOL 

153,0,8,0,0,0,0,8,3 

1428 

SYMBOL 

154,8,24,48,124,124,40,24 

,255 



1430 

SYMBOL 

155,0,0,0,8,0,0,8,192 

1448 

SYMBOL 

156,255,8,255,255,255,0,2 

55,0 



1450 

SYMBOL 

157,8,8,8,0,8,1,3,7 

1448 

SYMBOL 

158,8,24,68,182,231,231,0 


1478 SYMBOL 
1488 SYMBOL 
1498 SYMBOL 
31,255,255 
1588 SYMBOL 
24,224,192 
1510 SYMBOL 
1528 SYMBOL 
1,231,0 
1538 SYM80L 

1548 SYMBOL 
,99 


159,8,8,0,8,8,128,192,224 

168,7,7,7,7,7,7,7,3 

141.231.231.231.231.231.2 

162.224.224.224.224.224.2 

163,1,8,0,8,15,15,9,0 

192,129,255,124,126,34,23 

165,128,8,0,8,248,240,144 

166,0,8,24,68,124,127,119 



1550 SYMBOL 167,8,24,24,124,124,24,15 
3,195 

1548 SYMBOL 168,8,8,24,48,124,254,238 
,198 

1578 SYMBOL 149,119,119,63,43,31,31,1 
5,15 

1588 SYMBOL 178,238,238,252,252,248,2 
48,240,248 

1598 SYMBOL 171,7,7,3,2,1,1,8,0 
1608 SYMBOL 172,255,255,255,8,255,0,2 

55.8 

1418 SYMBOL 173,224,224,192,44,128,12 

8.8 

1420 SYMBOL 174,8,1,1,3,7,15,15,14 
1438 SYMBOL 175,8,4,148,254,253,252,2 



54.255 

1440 SYMBOL 176,8,0,0,0,0,128,44,96 
1458 SYMBOL 177,31,63,127,95,128,49,3 
,3 

1440 SYMBOL 178,255,223,191,127,255,2 

55.255.255 

1478 SYMBOL 179,32,140,148,144,208,20 
8 288 144 

1688 SYMBOL 180,7,15,15,15,31,31,31,8 
1690 SYMBOL 181,255,255,255,255,255,2 

55.255.8 

1780 SYMBOL 182,168,184,280,200,200,2 
88,248 

1710 SYMBOL 183,0,32,133,32,33,35,55, 
63 

1720 SYMBOL 184,0,129,395,129,129,195 
,231,255 

1730 SYMBOL 185,8,4,142,4,132,194,234 
,252 

1748 SYMBOL 184,43,63,43,31,31,15,8,7 
1750 SYMBOL 187,255,255,255,255,255,2 

55.8.255 

1768 SYMBOL 188,252,252,252,248,248,2 
40,16,224 

1770 SYMBOL 189,7,2,3,1,1,0,8,0 
1788 SYMBOL 190,126,40,124,255,0,255, 

255.8 

1790 SYMBOL 191,224,64,192,128,128,0, 


8,8 

I860 MODE 1:INK 1,24:1NK 2,14:INK 3,4 
3818 2*=STRING$<3,CHR$(143))+CHR*(10) 
4CHRI(8)+CHW(8)*CHR$(8HSTRING4(3,CH 
R*<143))+CHR$(10)tCHR*<8HCHR$(8)+CHR 
*<8)+STRlNG*<3,CHR4(143>) 

1820 x*=STR 1NG4(3,CHR*(128))4CHR$(10> 
tihK$(8)4CHM(8)4CHR$<8)+STRING$(3,CH 
R4<128)HCHR*(18)+CHR*<8)+CHRi<8)4CHR 
4<8)+STRING*(3,CHR$<128)) 

1838 T*=CHR*(144HCHM<145)4CHR*<146) 
4CHW(18)4CHR*(8)4CHR$(8)4CHRi(8)4CHR 
*<147)4CHR$(148)4CHR*<149)4CHM(10)4C 
HR$(8)4CHM(8)4CHM(8)4CKR$(158)4CHR« 
(15D+CHRK152) 

1840 P*=CHR»(153)4CHR*a54)4CHR*<155) 
4CHR*<10)4CHM<8)4CHR*(8)4CHR*(143)4C 


HR*<10)4CHR*(8)4CHR$(8)4CKR$(158)4CHR 

*(154)4CKR*<152) 

1850 AL$=CHR*(157)4CHR*<158)4CHR*(159 
)4CHR0(10)4CHRf(8)4CHR$<8)4CHR*(8)4CH 
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M<160)4CHR*<361)4CHR$<162)4CHR!K18)4 

CHR*<8)4CHR$<8)4CHR$<8)4CHR*<163)4CHR 

6<192)4CHR*(165) 

1868 R$=CHR$<366)*CBR$(167)4CHR$<168) 
♦CHR$(18)4CHRI<8)4CHR$<8)4CKRI(8)4CHR 
<(16?)4CHR$(H3)4CHR$<178)4CHRf(18)4C 
HRf(8)4CHR$<8)4CHRi(8)4CHR$(371)4CHR$ 
(172)+CHR$<173) 

1878 CA*=CHR*<174)4CHR$<1?5)4CHR»<176 
)4CHftl(18)4CHR$(8)4CHR$(8)4CHR$(8)4CH 
M<177)4CHRI(178)4CH(»<17?)4CHR*(18)4 
CHM(8)4CHRI<8)4CHR$<8)4CHR$(188)4CHR 
*(181)4CHR$<182) 

1888 RN$=CHM(183)+CHR$<184)4CHR$<185 

)4CHI»(18)4CHRi(8)4CHW(8)4CHW(8)4CH 

W(186)4CHR»(187)4CHR$(388)4CHR$<10)4 

CKR$(8)4CHW(8)4CHRK8)4CHR$(18?)4CHR 

*<198)4CKR$(191):RBTURN 

1898 PEN 2:F0R 3=1 TO 24 STEP 6:F0R i 


:LOCATE 18,1:PRINT RItt: LOCATE 4,1:PRI 
NT CA$:LOCATE 13,1iPRINT Rt 
1928 LOCATE 16,1:PR1NT AL6:LOCATE 19, 
1:PRINT CAI:LOCATE 22,1:PRINT T*:F0R 
1=1 TO 22 STEP 3(LOCATE I,4:PRINT Pf: 
NEXT 

1938 PEN 1:LOCATE 1,22:PR1NT T*:LOCAT 
E 7,22:PR1NT AL*: LOCATE 38,22:PR1NT R 
N$:LOCATE 4,22:PRINT CA$:LOCATE 13,22 
: PRINT M 

1948 LOCATE 16,22:PRINT ALLOCATE 19 
,22:PRINT CAf:LQCATE 22,22:PRINT T$:F 
OR 1=1 TO 22 STEP 3:L0CAT£ I,19:PR1NT 
P*:NEXT 
1958 RETURN 

I960 'BORRADO E 1MPRESI0N OE FI6URAS 
1978 IF (A=l OR Af=3 OR A=5 OR A=?) AN 
D <B=1 OR 8=3 OR 8=5 OR 8=7) THEN 268 

8 


=1 TO 23 STEP 6:L0CATE i,SPRINT z*:L 
OCATE i43,j:PRINT x$:NEXT:NEXT 
1908 FOR j=4 TO 24 STEP 6:F0R i=l TO 
24 STEP 6:L0CATE i ,j iPRINT x$:LOCATE 
i+3,JrPRINT z$:NEXT:NEXT:K4=' 1 2 3 
4567 8":PEN 1:LOCATE 1,25:PR 
1NT 1 A 6 C D E F G H*:FOR 1=2 
TO 24 STEP 3:LOCATE 25,1 :PRINT MW< 
K6,I,1):NEXT 

1918 PEN 3:PRINT CHR*(22);CHRi<l):LOC 
ATE 1,1iPRINT Tf:LOCATE 7,1iPRINT AL$ 


1980 IF <Ap2 OR Af4 OR A=6 OR A=8) AN 
0 (8=2 OR B=4 OR 8=6 OR 8=8) THEN 280 
8 

1998 PEN 6rLOCATE A4A4A-2,B4B+B-2:PR1 

ITT Z*:GQTO 2818:'CUADRO NEGRO 

2008 PEN 2:LOCATE A4A4A-2,B4B4B-2:PRI 

NT 2^:^ CUADRO BLANCO 

2818 IF (Ol OR C=3 OR C=5 OR C=7) AN 

D <0=3 OR 0=3 OR 0=5 OR 0=7) THEN 204 



2828 IF <02 OR 04 OR 06 OR 08) AN 
0 <0=2 OR 04 OR 06 OR 08) THEN 284 
8 

2838 PEN 0;LOCATE C4C4C-2,D4D4D-2:PR1 

NT Z$:6QT0 2058:'CUADRO NEGRO 

2848 PEN 2:LOCATE C+C4C-2,D4D4D-2:PR1 

NT Z*:'CUADRO BUNCO 

2858 PEN 1iLOCATE C4C4C-2,D4D4D-2 

2860 IF H$<A,B)= , P8’ THEN PRINT P*:GO 

TO 2188 



2878 IF H$<A,B)=‘PN‘ THEN PEN 3:PRINT 
P*:GOTO 2188 

2880 IF F»<A,B)= , TB" THEN PRINT T*:GO 
TO 2388 

2890 IF W<A,B)= , TN' THEN PEN 3:PRINT 
T*:GOTQ 2188 

2188 IF H6<A,B)='CB' THEN PRINT CA*:G 
OTO 2188 

2118 IF K*<A,B)= , CN* THEN PEN 3:PRINT 
CA$:GOTO 2180 

2120 IF WW.B^'AB* THEN PRINT AL*:G 
OTO 2180 



2130 IF H$<A,B)='AN' THEN PEN 3:PR1NT 
AL«:GOTO 2186 

2148 IF H$<A,B)='RB" THEN PRINT Ri:6Q 
TO 2188 

2158 IF H*<A,B)= , RN" THEN PEN 3:PR!NT 
R$:60T0 2188 

2168 IF H$<A,B)= , RNB' THEN PRINT RN$: 
GOTO 2186 

2178 IF H*<A,B)= , RW THEN PEN 3:PR1N 
T RN$ 

2188 PRINT CHR6<22);CHRI<8):LOCATE 28 
,4:PRJNT STR1NG$<18,* ’):LOCATE 28,5: 
PRINT STRINGS 18,’ “):PRINT CHR$<22); 














CHRIdhPEN I:IF REPETIC1CN=1 THEN 22 
10 

2198 PP=PP+1:AI=STR1<A):BI=STRf(B):C1 
=STR1(C):UI=STRt(D):JUGADAKPP)=A*+B$ 

2200 If HKC.DX'RN* OR HS<C,D)= , RB* 
THEN 2220 

2210 K$(C,D)=H1<A,B>:HI(A,B)= ,, :RETUR 
N 

2220 REPETICIOf+=l :U]NDOU«l ,24,48,1,24 
:CLSM:LOCATE!1,3,5:PR1NT81,'QUEREIS 
VER':LOCATEIl,3,7:PRINTI1,'LA PARTIDA 
?’ :L0CATE81,4,9:PRINT81,'S/N* 

2230 AI=INKEYI:IF A*=" THEN 2230 
2240 At=UPPER*<A$):IF A^'S* THEN 225 
0 ELSE IF A^'N' THEN 2370 ELSE 2238 
2258 H*U,l)= , TN , :Hf<2,l)=*CN , :H*<3,l 
) =, AN‘ :FM<4,1 )=’Rf#4* ;1H<5,1 )=‘ RN* :HI( 
4,1)=H1(3,1):HI(7,1)=HI(2,1):H1(8,1)= 
Hid,l):FOR 3=1 TO 8:H$(1,2)= , PN , :NEX 
T 

2248 FOR 1=1 TO 8:Hld ,7)= , PB*:NEXT:H 
I<1,8)= , TB 1 :HK2,8)= , C8' iHXS.BX'AB* 
!HI<4,8)= , RNB':HI(5,8)= , RB*:HI<4,8)=H 
1(3,8) :HI<?,8>=HI<2,8) :HI(8,8)=Hld ,8 
) 

2278 CLS:GOSUB 1898:JUGAD0R=2 
2288 FOR 1=1 TO PP:IF JUGADOR=2 THEN 
JU6AD0R=1 iFICHFV^'BLANCAS* ELSE JUGAD 
0R=2:FICWrt= , NEGRAS* 

2290 PRINT CHRK22) ;CHRI(0) [LOCATE 29 
,2:PRINT 1 JUGAOOR 1 jJUGAOOR:LOCATE 27,3 
:PRIKT*MUEVEN 1 ;FICHAI:LOCATE 28,9:PR 
lNT’JUGADA'jl 

2308 A$=LEFTI(JUGADAK1) ,2) :A=WAL(AI) 
:IF A=1 THEN A^’A" ELSE IF A=2 THEN 
A^'B 1 ELSE IF A=3 THEN A^'C 1 ELSE I 
F Af4 THEN A^'D 1 ELSE IF Af5 THEN Al 
='E* ELSE IF A=4 THEN A^’F 1 ELSE IF 
A=7 THEN A$='B‘ ELSE IF A=8 THEN A$=* 
H' 

2318 Bl=WlDI<JUGA0Ald),3,2):B=yAL(BI 
):LOCATE 28,11:PR1NT'DESDE "jAfjBI 
2328 CI=MDl<JUGADAld),5,2>:C=WL(CI 
):IF C=1 THEN C^'A 1 ELSE IF 02 THEN 
M=*8' ELSE IF 03 THEN ELSE 
IF 04 THEN C$=’D' ELSE IF 05 THEN C 
l='E* ELSE IF 04 THEN CO’F 1 ELSE IF 
07 THEN M=*G’ ELSE IF 08 THEN CO 
’H* 

2330 OORIGHT$(JUGAOA$(I),2):D=yAL(OI 
):LOCATE 28,12:PRINT , MSTA 'iCIjWiPR 
1NT CHRI(22)iCHRI(l) 

2348 GOSUB 1970 

2358 LI=1NKEYI:1F LO" THEN 2358 ELS 
E NEXT 

2348 GOTO 2220 

2378 CLS01:LOCATE 4,12:PR1NT , 0UERE1S 
JUGAR':LOCATE 4,13:PR1NT , 0TRA PARTIDA 


2388 AOINKEYI:IF A$=" THEN 2380 ELS 
E AOUPPERI(AI) 

2390 IF AO'S* THEN 118 ELSE IF AO’N 
1 THEN CLS:NEW ELSE 2398 
2400 MTI=HI(A,B):PQSTI=HI<C,D):HI<C, 
D)=HI(A,B):HI(A,B)=":'JAQUE AL REY B 
LANCO 

2410 FOR 1=1 TO 8:F0R J=1 TO 8:1F Hi< 
I ,J)=*RB’ THEN 2420 ELSE NEXT:NEXT 
2420 RX=I:RY=J 

2430 FOR 1=1 TO 8:F0R J=1 TO 8:1F RIG 
HTKHId ,J) ,1)='N’ THEN GOSUB 2448 
2440 IF SN08 THEN RETURN ELSE NEXT:N 
EXT 

2450 GOTO 2448:'NO HAY JAQUE 
2448 IF Hld.JX’PN 1 THEN 2478 ELSE 1 
F Hid ,J) =, TN* THEN 2488 ELSE IF Hid 
,J)= , CN' THEN 2550 ELSE IF Hld,J)= , A 
N* THEN 2548 ELSE IF Hld.JKRW 1 TH 
EN 2428 ELSE IF Hld.JX’RN 1 THEN 243 
8 

2478 IF dd=RX AND Jd=RY) OR <H=R 
X MD Jd=RY) THEN 2440 ELSE RETURN 
2488 IF 1=RX THEN 2490 ELSE IF J=RY T 
HEN 2520 ELSE RETURN 
2498 IF J<RY THEN 2580 ELSE 2510 
2508 FOR L=Jd TO RY-1:IF Hid,DO" 
THEN RETURN ELSE NEXT:GOTO 2440 
2518 FOR L=RY+1 TO J-liIF H$(I,L)<>" 
THEN RETURN ELSE NEXT:GOTO 2440 
2528 IF KRX THEN 2538 ELSE 2548 
2538 FOR L=Id TO RX-1 :IF HI(L,J)0" 
THEN RETURN ELSE NEXT:GOTO 2448 
2540 FOR L=RXd TO 1-1:1F HKL.JX)" 
THEN RETURN ELSE NEXT:60T0 2440 
2558 IF (H1=RX AND J-2=RY) OR <H2=R 
X AND J-1=RY) OR <H2=RX AND J+1=RY) 


OR (Id=RX AND J*2=RY) OR (H=RX AND 
J*2=RY) OR (1-2=RX AND J+1=RY) OR (I 
-2=RX AND J-1=RY) OR d-l=RX AND J-2= 
RY) THEN 2448 ELSE RETURN 
2540 AX=1:AY=J:IF ABS(I-RX)=ABS(J-RY) 
THEN 2570 ELSE RETURN 
2578 IF KRX AND J)RY THEN 2588 ELSE 
IF RXd MO RY>J THEN 2598 ELSE IF I< 
RX AND J<RY THEN 2400 ELSE 2418 
2588 AX=AX+1:AY=AY-1:1F AXJRX-l THEN 
2448 ELSE IF HI(AX,AY)0" THEN RETUR 
N ELSE 2588 

2598 AX=AX-l:AY=AYd:lF AX4RX+1 THEN 
2448 ELSE IF HI(AX,AY)0" THEN RETUR 
N ELSE 2598 

2408 AX=AXd:AY=AYd:lF AXJRX-l THEN 
2440 ELSE IF H$(AX,AY)0" THEN RETUR 
N ELSE 2488 

2418 AX=AX-1 :AY=AY-1 :IF AX<RXd THEN 
2448 ELSE IF HKAX,AY)0" THEN RETUR 
N ELSE 2410 

2428 IF ABS(3-RX)=ABS(J-RY) THEN AX=1 
:AY=J:GOTO 2578 ELSE 2480 
2438 IF d=RX AND J-1=RY) OR (I=RX AN 
D J+1=RY) OR d-J=RX AND J-1=RY) OR ( 
I - 1=RX AND J=RY) OR (H=RX AND Jd=R 
Y) OR <Id=RX AND J-1=RY) OR (H1=RX 
AND J=RY) OR (1-1=RX AND Jd=RY) THEN 
2448 ELSE RETURN 

2448 IF JUGAD0R=1 THEN SW=1 ELSE LOCA 
TE 31,14 SPRINT 1 JAQUE":SW=2 
2458 HI(A,B)=ANTI:HI(C,D)=POSTI:RETUR 
N 

2448 FOR 1=1 TO 8:F0R J=1 TO 8:IF Hl( 
I,J)= ,, RN ,, THEN 2478 ELSE NEXT :NEXT 
2478 RX=I:RY=J 

2488 FOR 1=1 TO 8:FQR J=1 TO 8:IF RIG 
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KT^<Kt<I,J)THEN 60SUB 2718 
2<98 IF SWOB THEN RETURN ELSE NEXT:N 

EXT 

2788 Ki(A,B)=ANTi:Hi(C,D)=PGSTi:RETUR 
N:'N0 MY JAQUE 

2718 IF Hid ,J)= , PB’ THEN 2728 ELSE I 
F Hid ,J)=*TB’ THEN 2738 ELSE IF Hid 
,J)= , CB 1 THEN 2888 ELSE IF Hid ,J)=‘A 
B 1 THEN 2818 ELSE IF Hid ,J)= , RNB* TH 
EN 2878 ELSE IF Kid ,J)= , RB' THEN 288 
8 

2728 IF (HHRX PND J+HRY) OR (I-HR 
X AND JO=RY) THEN 2890 ELSE RETURN 
2738 IF I=RX THEN 2740 ELSE IF J=RY T 
HEN 2778 ELSE RETURN 
2748 IF J<RY THEN 2758 ELSE 2768 
2758 FOR L=J+1 TO RY-1 :IF Hid.DO" 
THEN RETURN ELSE NEXT:GOTO 2898 
2768 FOR L=RY+1 TO J-lsIF Hid.DO" 
THEN RETURN ELSE NEXT:G0T0 2898 
2770 IF KRX THEN 2780 ELSE 2798 
2788 FOR L=IO TO RX-lilF HiTL.JX)" 
THEN RETURN ELSE NEXT:GOTO 2898 
2798 FOR L=RXO TO I-lsIF Ki(L,J)(>" 
THEN RETURN ELSE NEXT:GOTO 2898 
2888 IF (I+HRX AND J-2=RY) OR <H2=R 
X AND J-1=RY) OR <I*2=RX AND J+HRY) 


OR (I+HRX MD J42=RY) OR <1-1=RX MD 
J42=RY) OR d-2=RX AND J+HRY) OR d 
-2=RX AND J-1=RY) OR d-l=RX AWO J-2= 
RY) THEN 2898 ELSE RETURN 
2818 AX=1 :AY=J:1F ABSd-RX)=ABS(J-RY> 
THEN 2828 ELSE RETURN 
2828 IF HRX WD J)RY THEN 2838 ELSE 
IF RXd AND RY)J THEN 2848 ELSE IF 1< 
RX AND J<RY THEN 2858 ELSE 2868 
2838 AX=AX+1:AY=AY-1:IF AX)RX-1 THEN 
2898 ELSE IF Ki(AX,AY)0" THEN RETUR 
N ELSE 2838 

2848 AX=AX-1:AY=AY0:1F AX<RX+1 THEN 
2898 ELSE IF Hi(AX,AY)0" THEN RETUR 
N ELSE 2848 

2850 AX=AX+1:AY=AY+1:IF AX)RX-1 THEN 
2890 ELSE IF Ki(AX,AY)0 , ‘ THEN RETUR 
N ELSE 2850 

2860 AX=AX-1:AY=AY-1:JF AX(RX+1 THEN 
2898 ELSE IF HfXAXjAYX)” THEN RETUR 
N ELSE 2868 

2870 IF ABSd-RXHABS(J-RY) THEN AX=I 
:AY=J:GOTO 2820 ELSE 2738 
2888 IF (HRX AND J-HRY) OR (HRX AN 
D J+HRY) OR d-HRX AND J-HRY) OR ( 
I-HRX AND J=RY) OR d-HRX MD J+HR 
Y) OR (HHRX AND J-HRY) OR (H1=RX 
AND J=RY) OR d-HRX AND J+HRY) THEN 
2898 ELSE RETURN 

2898 Ki(A,B)=ANTi:Hi(C,D)=POSTi:lF JU 
GADOR=2 THEN SW=1 ELSE LOCATE 31,14:P 
R1NT*JAQUE*:SW=2 


rot n 



n sienpre avanza,nunca puede retroced 

er. 

2920 PRINT'Si es la prinera vez que s 
e nueve el pe-on, este puede avanzar 
dos Camillas, en I os denas casos solo 
una. 

2938 PRINT'El peon captura en diagona 
1 avazando si-enpre un paso, esto da 
la oportonidad al peon de canbiar de 
colunna. Si el peon encuentra alguna 
pieza -frente a si, se dice que esta 
bioqueada ya que no puede avanzar 
2948 aHINKEYiilF ai=" THEN 2948 
2958 CLS:LOCATE 19,1:PRINT Ti:PRINT:P 
RINT* La torre se juega sienpre en ii 
nea rec-ta, tanto en sentido vertical 
cono hori-zontal.'iPRINT'Puede captu 
rar piezas enenigas de la nisna forma 
que se nueve 

2968 aHINKEYi:IF aH" THEN 2968 
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2978 CIS:LOCATE 19,1:PRINT ALfsPRINT: 
PRINT" El alfil se mueve en diagonal, 
al igual que la torre captura de la 
misraa forma en que se juega. 

2988 PRINT" Hay dos alfiles en cada u 
no de 1 05 ban-dos : uno sobre casilla 
s blancas y otro sobre negras, los cu 
ales han de permane-cer sobre diagona 
les del mismo color. 

2998 a$=lNKEY*:lF a*="" THEN 2998 
3888 CLSiLCCATE 19,1:PRINT RNtsPRlNT: 
PRINT" La dama es la pieza de mayor 
campo de accion porque su movimento e 
s una combi-nacion de los ya conocido 


3838 PRINT' en una excepto cuando se 
realiza el en-roque (mover a la vez e 
1 rey y la torre) 

3848 PRINT" El rey es et elemento fu 
ndamental del juego. Hay que proteger 
!o del ataque de las piezas contraria 
s, al mismo tiempo, tendrenos que ata 
car su rey. 

3858 nt="ABCDEFGH"sPRINT CHR*(22)jCHR 
*(1):F0R i=U TO 29 STEP 4:LQCATE i,2 
8:PRINT it :NEXT :PEN 2.-LOCATE 29,28:PR 
INT t*:LOCATE 28,28:PRINT r*:j=0:FOR 
i=9 TO 38 STEP 3:j=ae1:LOCATE i,24:PR 
INT MID*(n$,j,l)sNEXT 


e pasar por encina de otra excepto el 
caballo. Este salts en forma de L,es 
decir,desde la casilla que ocupa pue 
de moverse a otra que diste 2 casilla 
s horizontales y una vertical o 
3138 PRJNT"a!reves,hacia atras o haci 
a adelante 

3148 LOCATE 14,IMPRINT z$:LOCATE 22, 
14:PR1NT z$sLOCATE 19,I9:PRINT z$:LOC 
ATE 14,22:PR1NT zf.-LQCATE 22,22:PR1NT 
zf 

3158 FOR i=l TO 1086.-NEXT:a*=iNKEY*:I 
F a*="" AND SyiTCH=l THEN 3148 ELSE 1 
F a$=" AND SWITCH=8 THEN 3178 ELSE R 


s de la torre y del alfil. Esta puede 
moverse en diago-nal, horizontal y v 
ertical. 

3818 a$=lNKEY*:lF at=" THEN 3818 


LETRA,NUMERO 


DE8DEi 


Z PARA ACABAR 


3828 CLSiLOCATE 19,1 :PR1NT r*iPRM:P 
R1NT* El rey tiene el mismo movimient 
o que la dama : horizontal,vertical y 
diagonal. Pero mientras la dama pu 
ede mover las casillas que quiera el 
rey solo pude ser jugado a las casill 
as contiguas de una" 


3848 PEN 1:FOR 1=1 TO 586sNEXT:al=INK 
EYtslF a$=*" THEN 3878 ELSE 3128 
3878 IF SUITCK=1 THEN 3888 ELSE IF SW 
1TCK=8 THEN 3898 

3888 PRINT CHR$(22);CHR4(8):PEN 1:L0C 
ATE 23,28:PRINT ZHsLOCATE 24,28:PR1NT 
X*:PEN 2:LOCATE 8,28:PR1NT T$sLOCATE 
28,28:PRINT R$:FOR 1=1 TO 5B:LQCATE 
13,18:PRINT"ENROQUE LARGO"iNEXT:GOTO 
3188 

3898 PRINT CHR*(22);CHR*<8)sLOCATE 14 
,28:PRINT XlsPEN 1:L0CATE 17,28:PR1NT 
Z$:PEN 2.-L0CATE 28,20:PR1NT REPRINT 
CHR*(22);CHR*(1):L0CATE 29,28:PRINT 
T$ sPRINT CHR*(22);CHR$(8):FQR 1=1 TO 
58:LOCATE 13,18:PR1NT"ENROQUE CORTO": 
NEXT:GOTO 3118 

3188 SUITCH=8:PRINT CHR$(22);CHR*<8): 

8(22);CHR$<1)sLOCATE 17,28:PR1NT T$:F 
OR 1=1 TO 3888:NEXT:GOTO 3848 
3118 SUITCH=1 :PRINT CHR4K22) ;CMR$(8): 
LOCATE 26,29:PRINT X*:LOCATE 24,28:PR 
INT R$sPRINT CHRK22) ;CHR*<1) :PEN 1:L 
OCATE 29,20:PRINT Z$:PEN 2.-LOCATE 23, 
28:PR1NT T$:FQR 1=1 TO 3888sNEXT:GOTO 
3848 

3128 CLEAR INPUT:CLS:LOCATE 19,1sPRIN 
T CAfSPRINTsPRINT' Ninguna pieza pued 


ETURN 

3148 PRINT CHR$(22);CHRI(1):PEN 2.-SU1 
TCH=8:LOCATE 14,14:PRINT ca*:FOR i=l 
TO 409:NEXT:PEN 1-.LOCATE 14,14:PRINT 
zfsPEN 2:LOCATE 19,22:PRINT caisFGR i 
=1 TO 488sNEXTsPRINT CHR*<22);CHRi<8) 
sLOCATE 19,22:PR1NT risGOTO 3158 
3178 PRINT CHR$(22);CHR$(1):PEN 2:SUI 
TCH=1sLOCATE 14,14:PR1NT ca*:FOR i=l 
TO 480sNEXT:PEN 1sLOCATE 14,14:PR1NT 
zfsPEN 2sLOCATE 22,19:PRINT ca$:FOR i 
=1 TO 488sNEXTsPRINT CHRI(22);CHR*(8) 
sLOCATE 22,19:PRINT risGOTO 3158 
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Gigantes te espera coda martes en tu kiosco. Una revista impres 
cindible para todo aficionado. Gigantes del Basket te ofrece las 
ultimas notidas, las mejores fotos, las opiniones que te interesan, 
las entrevistas que esperas, las anecdotes que te divierten y ios 
los comentarios que te gusto conocer. 

Pidela iodas las semanas, porque Gigantes da la falla. 









Trivial: 


Un juego impresionanle! 
&Te lo imaginas 
ert tu ordenador 
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Fairlight 

AMSTRAD PCW 


Despues de un dia duro y trabajado, Ivar puso rumbo al hogar. En su mente 
ruda y campesina, pero inteligente, siempre estaba la misma pregunta: £Por 

que debi'a trabajar de sol a sol? 



encontrar explicacion a este 
hecho, ilego a la taberna del 
pueblo donde siempre se tomaba 
una jarra de vino mientras 



hablaba con los amigos. En la 
puerta de la taberna vio clavado 
un bando y lo leyo con 
detenimiento. Este era su 
contenido: 

«EI senor de Cakchi busca un 
hombre valeroso capaz de salvar 
al mago del feudo y a su Eibro 
magico que $e hallan prisioneros 
en el castillo de Avar. Si deseas 
cumplir esta mision, presentate sin 
demora. El que logre liberar al 
mago y a su libro sera 
grandemente recompensado.» 

Ivar no lo penso mas y puso 
rumbo al castillo de Cakchi. 
Cuando estuvo en presencia del 
poderoso amo del feudo, este le 
pregunio si sabia utilizer la 
espada, a lo que Ivar contesto 
que no, pero que con un poco de 
practice aprenderia. 



Despues de la audiencia, Ivar se 
pertrecho como correspondfa a la 
mision que iba a emprender y a 
lomos de su brioso corcel se 
dirigio al castillo de Avar. Al 
llegar a la entrada del castillo se 
percato de que el puente levadizo 
estaba bajado y, muy extranado 
por esto, entro hasta el patio de 
armas. 

Lo estaba reconociendo cuando 
repentinamente y de la nada, vio 
como se formaba la espectral 
reencarnacion de un guerrero. 
Ahora entendfa el por que de esa 
aparente falta de vigilancia, asi 
como la magnitud de la tarea que 
iba a emprender. 

Como nosotros tenemos otra por 
delante, y no menos importante 
que la de Ivar, dejaremos a este 
espada en ristre y cogeremos la 
pluma para relatar los 
pormenores que nos han sucedido 
con FAIRLIGHT, juego realizado 
por THE EDGE. 

Y para que no sucedan cosas 
deberemos cargar el sistema 
operativo, que viene con el 
equipo, ya que el juego no lo trae 
incorporado. 

Despues de cargado, aparecera 
en pantalla un «lienzo» en el que 
podremos ver un castillo que se 
halla en las cercanfas del mar. 


Pulsamos una tecla, y aparecera 
el menu donde se nos indicara 
como movernos, saltar, luchar, 
seleccionar objetos y utilizarlos, 
etc. 

El por que de esta explicacion se 
halla en que tambien podemos 
usar las teclas del cursor, a 
nosotros nos parece menos lioso, 
y esto no queda muy claro en el 
menu. 

Para saltar en la direccion que 
queramos, deberemos mantener 
pulsada la tecla de la direccion en 
queramos ir y presionar la tecla 
MAYS. 

Pues una vez que ya hemos 
aclarado esto o, por lo menos, lo 
hemos intentado, podemos seguir 
adelante en nuestra importante 
tarea de salvar al mago y a su 
libro. 

Pero si queremos que nuestra 
energia vital no disminuya, 
tenemos que estar atentos al 
indicador en pantalla y procurer 
evitar el contacto de torbellinos, 
soldados reencarnadaos, gigantes 
barbudos y monjes negros. 

Todos ellos son peligrosos, su 
contacto es mortal si es muy 
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largo, pero unos lo son mas que 
otros. Veamos: 

MONJES NEGROS. Desde el 
momento en que aparezca uno en 
pantalla no dejara de 
perseguirnos. Son indestructibles. 
SOLDADADOS REENCARNADOS. 
Aparecen en pantalla desde 
debajo de su casco. Son duros de 
pelar, pero despues de un arduo 
enfrentomiento se les puede 
veneer. Una vez muertos se debe 
recoger su casco, ya que si no, 
volveran a aparecer y nos 
atacaran de nuevo. 

GIGANTES. Son grandes y 
poderosos. Llevan una porra con 
la que nos golpearan desde el 
momento en que nos vean. Se les 
puede matar con unos cuantos 
golpes de espada. Un 
«fenomeno» que hemos dejado 
para el final lo forman Ios 
TORBELLINOS, que veremos 
aparecer casi en cualquier 
pantalla. Estos voraces elementos 
meteorologicos destrozan todos 
Ios objetos que pilEen a su paso, 
asf como nos restaran energfa si 
nos tocan. 

Ya que hemos hablado de 
objetos, vamos a describir para 
que sirve cada uno. 

EL PAPIRO. Sirve para 
teletransportarnos. Se encuentra 
en el patio de armas del castilla, 
o sea en la primera pantalla. 

LA CORONA. Junto con el libro 
magico, sirve para terminar el 
juego. Se encuentra encima de la 
puerta inferior del patio de armas. 
Para llegar a alcanzar la 
CORONA es necesario uno de Ios 
utilfsimos BARRILES que podremos 
encontrar en algunas de las 
dependencies del castillo. LLAVES, 
hay ocho y cada una sirve para 
abrir una puerta determinada. 
CIRCULO ENERGETICO. Se 
encuentra flotando en muchos 
corredores y pasadizos. Su 
contacto nos confiere mayor 



velocidad, pero nos restan 
energfa vital. 

OBJETOS ALIMENTICIOS. Nos 
reponen energfa y es interesante 
utilizarlos cuando nos encontremos 
exhaustos. Los objetos son: un 
polio, un botijo, un reloj y una 
barra de pan. 

POCION Y CRUZ. Dan paso a 
algunas pantallas que de otra 
forma serfa imposible. 

EL LIBRO DE LA LUZ. Una vez 
que lo tengamos, junto con la 
CORONA como ya hemos dicho, 
habremos terminado la mision. El 
LIBRO DE LA LUZ se halla situado 
en una remota galena 
subterranea del castillo. 

FAIRLIGHT esta confeccionado 
con la interesante tecnica de 
«FILMATION», por lo que vemos 
pasar por la pantalla de nuestro 
ordenador una pelfcula dentro de 
la que nos sentimos plenamente 
integrados, mas aun si tenemos en 
cuenta que en esta ocasion el 


angulo visual se ha subido, o sea, 
tenemos una vista mas de 
«pajaro». 

Graficamente es bueno, pero 
pensamos que se podrfa mejorar 
la definicion. 

La animacion esta bien realizada 
y, tanto Ivar como todos sus 
oponentes se mueven con una 
velocidad acertada. Tambien esta 
muy bien logrado el movimiento 
de pelea que nos recuerda un 
poco al esgrima. Pues otro juego 
para PCW y, cada dfa son mas, 
que pensamos esta bien realizado. 
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Pascal o basic 

HE AQUI EL DILEMA 


Francisco G.R. 


JJ 

efirit 


efiriendonos a la 
saga de los ordenadores Amstrad 
tenemos que decir que existen 
varios compiladores de Pascal y 
de Basic. Dentros de estos ultimas 
tenemos que destacar el MBASIC 
y el CBASIC, aparte del Mallard 
Basic, que contienen los PCWs y 
el Basic Locomotive que lleva 
grabado en ROM los CPCs, como 
los compiladores o lenguajes Basic 
mas importantes existentes en 
nuestro pais a la venta (hecho 
muy importante el que podamos 
disponer de eiios en caso de 
necesidad). Referente a 
compiladores de Pascal debemos 
destacar el Pascal MT-PLUS y el 
Pascal de Hisoft, ambos tambien 
disponibles en las listas de 
software espanolas. Existen otros 
compiladores de Pascal que aun 
no han llegado, y esperemos que 
lleguen pronto como puede ser el 
famoso magnifico Turbo Pascal. 
Cada uno de los anteriores 
compiladores tanto para Basic 
como para Pascal tienen 
diferencias notables segun la 
necesidad de que precisemos. 
Mientras el MBASIC de Microsoft 
esta debil en la cuestion de 
graficos, el CBASIC, podriamos 
decir que es todo lo contrario. En 
el Pascal de Hisoft y el Pascal 
MT + tambien las hay, uno opera 
mejor los ficheros que el otro, 
mientras con el MT-PLUS nos 
permite mayor capacidad para 
nuestros programas el Pascal de 
Hisoft se potencia con mayor 
facilidad de manejo de ficheros. 

El lenguaje Basic practicamente 
todo el mundo lo conoce aunque 
solo sea de oidas, mientras el 
Pascal no tanto. Esto puede ser 
debido a que este ultimo sea un 


A la hora de elegir el aprendizaje de 
un lenguaje de prog ra mac ion se nos 
plantea la duda de cudl elegir entre los 
existentes , y una y/ez dentro de estos, 
cudl puede tener mayor porvenir. 
Nosotros vamos a intentar ver algunas 
de las diferencias entre los 
lenguajes de programacidn Basic y 
Pascal para que usted rnismo pueda 
comparar estos dos lenguajes. 


lenguaje mas cientifico y 
considerado como lenguaje de 
alto nivel, y el Basic por su facil 
asimilacion se le haya rebajado a 
un uso mas corriente, quitandole 
la potencia del cual se merece. 
Podriamos decir refiriendonos al 
lenguaje Pascal que es menos 
conocido, que es un lenguaje 
estructurado, que contiene una 
potencia de trabajo superior a 
otros lenguajes (en cuatro 
palabras podriamos decir que 
diciendo menos dices mas), la 
incorporacion de procedures que 
le dan una gran potencia al restar 
del sistema los saltos a subrutinas, 
potenciando estas procedures que 
pueden incluso llamar a otros e 
incluso llamarse a si misma 
operando con las variables que 
contiene dentro de si. Tambien 
podemos decir que esta dotado 
de procedimientos recursivos, tal y 
como nos habiamos referido 
anteriormente al hecho de 
cambiar las variables y llamarse 
luego a si mismo. 


Diferencias en la practica 
y similitud 


unas curvas senoidales y 
cosenoidales. 

El primero es el paso de grados 
de una escala a otra. Varnos a 
ver el listado escrito en Pascal y a 
continuacion escrito en Basic: 


Programa 'CALCULO' 

Funcion: Calcula grados 
centigrados a grados Fahrenheit. 

Realizacion: Pascal. 

Listado: 

PROGRAMA CALCULO (INPUT, 
OUTPUT) 

CONST CONVERSION = 1.8; 

DESPLA = 32.0; 

VAR CENTEMPdNTEGER; 

FAHRTEMP:REAL; 

( *Comienzo del cuerpo del 
Programa principal* ) 

BEGIN 

WRITELN ('CENTIGRADOS 
FAHRENHEIT'); 

READ(CENTEMP); 

FAHRTEMP:=CENTEMP* CON¬ 
VERSION 
+ DESPLA; 

WRITE(CENTEMP:2,' ':9,FAHR- 
TEMP:7:1) 

END 

Descripcion del programa. 


Hemos creado dos programas Lo primero que designamos es 

uno que nos pasa los grados el nombre del programa que 

ceniigrados a grados Fahrenheit, denominaremos 'CALCULO', el 
y un segundo que nos representa cual esta definido como un fichero 
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de entrada y salida estandar en la 
maquina que dispongamos. Esto 
se refiere que los datos entraran 
por el teclado y saldran por la 
pantalla. Seguidamente 
declaramos las variables que 
vamos a necesitar en la 
realizacion de nuestro programa: 

- CONVERSION 

- DESPLA 

- CENTEMP 

- FARHRTEMP 

Siendo las das primeras 
variables constantes, la tercera es 
una variable entera y la ultima la 
definimos coma una variable real. 
Una vez definidas las variables 
comenzaremos con la creacion del 
programa en la cual ia orden 
'BEGIN' es la encorgada del 
eomienzo del mismo, para que el 
sistema pueda reconocer la 
entrada. La segunda funcion 
escrita en un 'WRITELN', que es 
la equivalente como despues 
comprobaremos a un 'PRINT' a 
secas, Luego tenemos una nueva 
instruction dentro de nuestro 
programa, se trata de 'READ', 
esta instruccion se puede definir 
como un 'INPUT' en Basic. A 
continuation tenemos una serie de 
cdlculos que bien podrfamos 


traducir por un 'LET' con un valor 
tras el resultado de unas 
operaciones. Para finalizar 
tenemos que nos escribe en la 
pantalla el resultado obtenido del 
paso de una unidad a otra, y el 
final de la ejecucion. 

Como hemos podido comprobar 
hay ciertos sfmbolos que forman 
parte del lexico del Pascal, estos 
simbolos son, por ejemplo, los 
puntos y comas que aparecen al 
final de una linea, con lo cual 
indica que esa linea de programa 
ha terminado, cosa que en Basic 
se denota cuando se encuentra la 
numeracion de la siguiente linea. 
Pero al reves que en el Basic es 
obligatorio colocar un numero 
para ver que efectivamente se ha 
acabado la anterior, en Pascal 
hay varios casos en los cuales no 
se denota el punto y coma. Estos 
casos pueden al principio del 
programa, despues de un 
'BEGIN', antes de producirse un 
'END', etc. Otro simbolo 
particular es el punto que 
insertamos despues del 'END.', 
este lo indicamos para expresar 
que esta es la ultima linea dei 
programa. 

Tambien podemos observar que 
existe una linea que esta 
encerrada entre parentesis, esto 


nos indica que lo que a 
continuation sigue es un 
comentario que el ordenador no 
lo tiene encuenta a la hora de 
correr el programa, sino que mas 
bien es una ayuda al 
progromador para localizar las 
partes de su programa. Estas 
iineas similes en Basic con el 
'REM', van precedidas por un 
parentesis y a continuacion un 
A continuacion tenemos el 
mismo programa realizado en 
Basic para poder observar mejor 
las diferencias: 

Programa 'CAMBIO' 

Funcion: Calcula grados 
centigrados a grados Fahrenheit. 

Realizacion: Basic. 

Listado: 

10 LET CONVERSION = 1.8 
20 LET DESPLA = 32.Q 
30 INPUT CENTEMP 
40 LET FAHRTEMP = CENTEMP* 
CONVERSION+ DESPLA 
50 PRINT "CENTIGRADOS 
FAHRENHEIT" 

60 PRINT 
CENTEMP;" 

FAHRTEMP 
70 END 

Descripcion del programa. 

La descripcion del programa se 
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ha realizado anteriormente, pero 
debemos dejar constancia que no 
era necesario el tener que escribir 
el comando 'LET', pero en Basics 
diferentes al de los CPC de 
Amstrad, hay que denotarlo. 

El segundo programa que 
vamos a ver se trata de realizar 
la representation en pantalla de 
unas curves senoidales y 
cosenoidales: 

Programa 'CURVAS' 
Funcion: Representation de una 
funcion. 

Realization: Pascal. 

Listado: 

PROGRAM 

CURVAS(INPUT,OUTPUT) 

CONST H= 34 

C= 6.2831; (* 2 * 
PI*) 

VAR X,Y,D :REAL ; 

l,N,S,LIM:INTEGER 

BEGIN 

READ(D,S,LIM); 

FOR 1:0 TO LIM DO 

BEGIN 

X; = D* 1 ; 

Y: = EXP(—X)*SIN(C*X); 

N: = ROUND(S*Y) + H; 

WHILE N = 0 DO 
BEGIN 

WRITE(' '); 

N: = N — 1 
END; 

WRITELN('*') 

END 

END. 

Descripcion del programa. 
Como siempre denotamos el 


nombre del programa y el tipo de 
programa del cual se va a tratar, 
en este caso sera de nuevo un 
programa de salida por pantalla y 
entrada de datos por teclado. A 
continuation definimos las 
variables siempre comenzando 
por las variables constantes y 
seguidamente las reales y enteras: 

— H Variable constante 

— C Variable constante 

— X Variable real 

— Y Variable real 

— D Variable real 

— I Variable entera 

— N Variable entera 

— $ Variable entera 

— UM Variable entera 

Una vez definidas todas ellas, 
comenzaremos con la estructura 
del programa. Este comenzara 
con un 'BEGIN', a continuation le 
precerd un 'READ' (entrada de 
dato por el teclado), y se iniciard 
un bucle que ird desde 0 hasta la 
variable 'LIM'. Luego tendremos 
el comienzo de una subrutina que 
tambien podfamos haber puesto 
en forma de procedure, en esta 
parte nueva del programa vamos 
calculando los valores para que 
mas tarde se representen 
grdficamente en la pantalla. 

Luego tenemos la parte en la cual 
se encarga de representor la 
curva, la cual debe de ir mediante 
'WRITELN' (instruccion igual que 
un Print en Basic , imprime y se 
pasa a la siquien tinea) o WRITE' 
(esta la podriamos igualar como 


un Print seguido de un punto y 
coma, o sea, que el siguiente 
caracter a imprimir se coloque a 
continuacion del anterior escrito). 

Y finalizaremos con el 'END.'' 

Ahora lo vamos a desarrollar en 
Basic: 

Programa 'GRAFICO' 
Funcion: Representation de una 
funcion. 

Realization: Basic. 

Listado: 

10 LET H = 34 

20 LET C = 6.2831 :REM 2*PI 
30 INPUT D,S,LIM 
40 FOR 1 = 0 TO LIM 
50 X = D * I 

60 Y = EXP(-X)*SIN(C*X) 

70 N = ROUND(S*Y) + H 
80 WHILE N = 0 
90 PRINT " 

100 LET N = N 4- 1 
110 WEND 
120 PRINT "*" 

130 NEXT I 
140 END 

Como podemos comprobar la 
estructura de uno y otro son 
practicamente casi identicas, lo 
hemos intentado realizar de una 
manera identica para que el lector 
pueda comprobar la similitud 
entre los diferentes comandos y la 
nomenclatura a seguir. La 
diferencia grande de uno a otro 
la podriamos tener y de hecho la 
hay en el desarrollo y calculo de 
una a la otra, siendo el programa 
compilado en Pascal mas rapido 
que compilado en Basic. 
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CHALLENGE 

GAME 


ART/C 


VIRGIN 


VIRGIN 
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• SHOGUN: 

Emocionante arcade-aven- 
tura con mas de 128 panta- 
llas. Control de imagenes 
mediante iconos.AS 101 

• DAN DARE: 

Uno de los mas famosos 
heroes de las tiras de co¬ 
mics de todos los tiempos. 
AS 105 

• ATLANTIC 
CHALLENGE: 

Una excitante y divertida 
simulacion. 100% codigo 
maquina. Alta resolucion. 
AS 104 

• ALADIN'S CAVE: 

Divertido juego de arcade. 
Deberas veneer al malvado 
genio de la lampara ma- 
gica. AS 102 

• STAR COMMANDO: 

Maravillosa perspectiva en 
3D. 16 Sectores de galaxia. 
97% de codigo maquina. 
Accion rapida. AS 103 

• STRANGELOOP: 

Increible riqueza grafica. 
Carga rapida. 250 lugares 
diferentes. Control me¬ 
diante joystick. AS 100 

PROGRAMAS DE 
IMPORTACION: 

PI100-ALKAHERA 

PI101-SUPER SAM 

P1109-6 PACK PLUS (6 juegos) 

GS101-AUNEADOR DE CABEZAS 
PI112-INTERNATIONAL KARATE 


DISTRIBUIDO POR: 



DISCOVERY 

informatic 

Arco Iris, 75 
T. 256 49 08-09 
08032-BARCELONA 








































CUCAL 


jMaldita cucaracha! Un arcade con una buena presentation 
y en el que nuestra habilidad y reflejos serdn 
indispensables para conseguir el exito. 

J 



I comenzar el 
juego aparecen las instrucciones 
y teclas de uso. El juego consta de 
diez fases distintas, las cuales, 
aumentan en dificultad a medida 
que vamos pasandolas. En cada 
fase hay tres frutas (excepto en la fa- I 
se diez que hay tres Haves), las cua 
les nos dan la posibilidad de pasar 
a una fase superior despues de ha- 
ber side comidas. 

En las fases 4, 6, y 8 podran ver 
una bombillita, la cual, no se puede 
coger aparentemente, pero se daran 
cuenta que al comer las tres manza- 
nas que hay en estas fases se abre 
la puerta de salida y, ademas, desa- 
parece una mina de la pantalia, la 
cual, nos deja la posibilidad de co¬ 
ger la bombilla que, por supuesto no 
es obligatoria. 

Y se preguntaran: jPara que sirve 
esto de las bombillas?, pues sirve pa 
ra que al llegar a la fase n 
oscura) tengamos luz, es decir, si du¬ 
rante nuestro recorrido hemos cogi- 
do las tres bombillas en la fase n° 9 


podremos ver la situacion de las mi - 
nas, de lo contrario, las minas no 
apareceran, pero se encuentra en su 
lugar. 

Despues de haber cogido las tres 
Haves de la fase n c 
do veran como aparece un letrero de 




enhorabuena, se rodea la pantalia 
de minas y despues de haber sona- 
do cuatro veces la musica y de ha¬ 
ber pasado atras cuatro veces dos 
cucarachas aparecera un letrero que 
nos dice que pulsemos la letra a pa¬ 
ra jugar otra vez. 

Si, por el contrario, nuestra mision 
fracasa y nos matan las tres vidas, 
veremos como un final, una bota 
aplastando a una cucaracha y un le¬ 
trero que nos dice que pulsemos la 
s para fugar otra vez. 

En cada fase y para dificultar la 
mision, habra una bota que intenta- 
ra pisarnos. 

Para que vosotros podais ver to- 
das las fases sin que os moleste la bo¬ 
ta, aqui os doy el remedio. 
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Anadid la linea: 

145 u = 1: q=l 

Esfas variables dan las coordena- 
das a la bota, por lo tanto, vereis 
que la bota aparece en la esquina 
superior izquierda del monitor. 

Las vidas que quedan se represen 
tan por un cucaracha y cuando te 
matan, la cucaracha se convierte en 
un esqueleto. 

El juego tien^^jmjg^JfiE'C va 

da. 


rcador q 

n.Munlo la pumuacion abten 
Todos los mavimientos, choq 
etc., van acompafiados de'efe 
> spt-ciales. 




lo 




. t V e^SsJ a a 

k ^ 0 S 

* *e°*« o0e 


e§c a 


\ £ 0 ** 
JOGAP 


VARIABLES PRINCIPALS 

u,q: Coordenadas de la bota. 
a,d: Coordenadas de la 
cucaracha. 
li: Vidas. 

e(x): Variable para la 
localizacion de la cucaracha. 
man: Frutas comidas. 
pan: n° de fase. 
j,k: Coordenadas minas. 
i,s: Coordenadas bombillas. 


SUBRUTINAS PRINCIPALES: 


150 270: Programa principal. 
680-740: Comprueba si ha 
chocado o comido. 

990-1190: Coloca minas, Haves 
y bombillas. 

1200-1790: Pantallas. 


10 'HiHHIHHU 
28 '* * 

38 '* ESCARABAJQ * 

48 '* POR * 

58 '* A. FRIAS * 

68 '* * 

78 '*h»h******** 

88 GOSUB 498 

98 MODE 1:BORDER 8:INK 0,8:GQSU8 197 
8 

188 CLS:CLEAR:a= 11 :d=9:rnF 14:1 i=3:u=l 
:q=l:DIM e(128) 

118 GOSUB 968:GOSUB 928: GOSUB 768:GO 
ISUB 1218 
J28 nl$=q3$ 


UIDAS 

m 

m 

■ #• 


138 n2*=q4$ 

148 RESTORE 

145 u=l:q=l 

158 FOR n=l TO 15 

168 IF INKEY(69)=8 THEN GOSUB 298 

178 IF INKEY<71)=8 THEN GOSUB 348 

188 IF INKEY(39)=8 THB4 GOSUB 398 

198 IF INKEY(31)=8 THEN GOSUB 448 

280 LOCATE u,q:PRINT* 1 :LOCATE u,q 

tl:PRINT* ":IF u=a AND d=q THEN SOU 

ND 3,808,38,15:G0SUB 618 

210 READ u,q 

228 SOUND 1,408,8,7,15 

230 LOCATE u,q:PRINT ql5*:L0CATE u, 

q+1:PRINT qi6* 

248 IF u=a AND d=q THEN SOUND 3,800, 
38,15:GOSUB 610 
258 NEXT n 

260 nki=nki + 1:IF nki/2=nki\2 TUB! RE 
STORE 

278 GOTO 158 

288 'ihhARRIBAHH* 

298 LOCATE a,d:PRINT* * sLGCATE a,d+ 
1 SPRINT* * 

380 nRi-12:d=d-2 
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318 GOSUB 498 
328 RETURN 

338 '*****ABAJO***** 

348 LOCATE a,d:PRINT* ■.•LOCATE a,d4 

1:PRINT* 1 

358 n=n+12:d=d+2 

348 GOSUB 498 

378 RETURN 

388 '«*«1Z8UIER0A***** 

398 LOCATE a,dsPRINT 1 -:LOCATE a,d+ 
1 :PRINT‘ * :ml$=q5$:ri2$=q4$ 

488 r*=r»-l :a=a-2 
418 GOSUB 498 
428 RETURN 

438 '******DERECHA****** 

448 LOCATE a,d:PRINT' 1 *:LOCATE a,d+ 
1:PRINT' " :ml$=q3$:n2*=q4$ 

458 hri+I :a= a+2 
448 GOSUB 498 
470 RETURN 

488 / **********caractere5**t******** 
* 

490 SYMBOL AFTER 260 
500 SYMBOL 241,8,34,18,9,15,31,48,12 
1 :SYMBOL 242,8,128,44,44,198,239,41, 
255: SYMBOL 243,255,41,239,198,44,44, 
!28:SYMBOL 244,127,40,31,15,9,18,34 


518 SYMBOL 245,0,128,148,140,112,14, 
38,14:SYMBOL 244,14,80.14,112,140,14 
0,128:SYMBOL 247,8,1,49,49,14,8,10,1 
12:SYMBOL 248,112,18,8,14,49,49,1 
520 SYMBOL 249,8,0,252,252,252,252,2 
52,252:SYMBOL 258,252,254,254,254,25 
4,254,252:SYMBOL 251,1,24,59,12?,127 
,127,43 

53B SYMBOL 201,0,3,8,1,1,7,15,31:SYM 
SOL 282,0,48,94,192,128,224,24.8,248: 
SYMBOL 283,43,43,43,43,31,15,7:SYMBO 
- 2B4,252,252,252,252,248.24B,224 
5-50 SYMBOL 285,8,8,34,17,153,205,48, 
255:SYMBOL 204,255,48,205,153,17,34: 
SYMBOL 209,8,0,8,8,134,231,89,255:SY 
MBOL 288,255,89,231,134 
550 SYMBOL 218,8,1,2,2,99,247,188,25 
5:SYMBOL 211,255,188,247,99,2,2,1:SY 
MBOL 212,8,34,72,144,240,248,46,254: 
SYMBOL 213,254,40,248,246,144,72,34 
548 SYMBOL 214,0,8,8,8,8,0,31,43:SYM 
30L 215,0,8,8,0,0,0,28,198:SYMBOL 21 
4,127,255,255,255,102,44,132,198:SYM 
SOL 217,243,255,254,248,48,32,44,94 
576 SYMBOL 218,8,8,7,24,32,47,128,12 


8:SYMBOL 219,128,128,47,32,24,7:SY| 
OL 228,0,8,128,44,32,30,199,43:SY«B0 
L 221,43,199,30,32,44,128:SYMBOL 222 
,252,252,252,252,252,252,252,252 
580 SYMBOL 223,0,12,18,33,225,225,18 
,12:SYMBOL 224,0,8,188,188,131,127 
598 RETUffrS 

408 '**********P!ERBE 'JIDA********** 

i 

410 1i=li-1:PO=PO+3 
428 BORDER 8,15 
438 LOCATE 3,B+P0:PRINT q7i:LOCATE 3 
,9+P0:PRM q&$ 

448 FOR i=l TC 2088 :NEXT i 
S 0 

458 IF 1i=0 THEN GOSUB 640 
440 LOCATE u,q:PRINT' “.'LOCATE u,q 
41:PRINT“ 1 
478 a= 11:d=9:m=14:u=l:q=l:LOCATE a,d 
:PRINT q3$.'LOCATE a,d4l:PRINT q4$:G0 
T 0 128 

488 -'**********COMPRUEBA CHOQUE***** 
***** 


. 



















690 IF man)=3 AND m=94 THEN IF nsan>3 
THEN uno=uno+l:GOSUB 828 ELSE GOSUB 
820 

708 IF e(n)=8 THEN SOUND 3,2588,38,1 

5,18,9,15:G0SU8 418 

710 IF e<r»)=2 THEN SOUND 1,48,4,15:T 

A=TA+188:LOCATE 34,?:PR1NT TA:man=nia 

n+1 :e<m)=l: IF rian=3 THEN LOCATE 31,2 

1 :PR1NT* ":LOCATE 31,22:PR1NT“ M 

F ro=4 THEN GOSUB 1958 

720 SOIHD 1,280,4,15 

738 LOCATE a,d:PR!NT ral$:LOCATE a,d+ 

1 :PRINT m2$ 

748 RETURN 

750 ' **********NUESTRA VIDAS******* 

** 

748 LOCATE 2,8:PRINTOUT DAS":1=8 
778 FOR N=1 TO 3 

788 1=1+3:LOCATE 3,1:PRINT q3$:L0CAT 
E 3,1 + 1::PRINT q4$ 

798 NEXT 
888 RETURN 

810 -'*******cMhio de pantalU****** 
*** 

820 FOR R=!588 TO 388 STEP -8:S0UND 
!,k,8.5,15:NEXT 

830 ON ida GOTO 1240,1310,1348,1428, 
1470,1520,1578,1439,1758,2188 
848 '*****m*-f inal**»******** 

850 MODE 1:BORDER 14 
840 CLEAR:GOSUB 940:LOCATE 19,28:PR1 
NT q13$:LOCATE 19,21:PR1NT ql4$:LGCA 
TE 1,12:PRINT“ Ohhhhhh!!!!!!!! L 
0 SIENTQ!!! 1! " !“ 

878 PEN 3:FOR x=l TO 20:LOCATE 19,x: 
PRINT q17$:LOCATE I9,x+1:PR1NT ql4$: 
SOUND 1 ,ABS(x-20)*20,3,15:F0R r=l TO 
18:NEXT r:NEXT x 
380 FOR n=l TO 1080:NEXT 
898 LOCATE 6,23:PRINT"PULSA S PARA J 
IJGAR OTRA VEZ" 

988 A$=INKEYf:IF A$="S' OR A$=V TH 
EN RUN ELSE GOTO 988 
910 '**********dibuja pantalla*****» 
***** 

920 PEN 1:FOR n=9 TO 32:L0CATE n,7:P 
RINT CHR$(287):LOCATE n,8:PRINT CHR$ 
(207)’.LOCATE n,23:PRINT CHR$(207):LO 
CATE n,24:PRINT CHR$(297):NEXT 
938 FOR n=9 TO 22:LOCATE 9,n-.PRINT 
q18$:LOCATE 31,n:PRINT ql&$:NEXT 
940 RETURN 

950 '*******uariable5 de caraderes* 
******* 

940 q!$=CHR$(218)*CHR$(220) :q2$=CHR$ 
(219)+CHR$(221):q3$=CHR$(241)+CHR$(2 
42) :q4$=CHR$(244)+CHR$<243):q5$=CHR$ 
(210)+CHR$(2!2):q4$=CHR$(211)+CHR$(2 
13) :q7$=CHR$(285)+CHR$(209 ):q8$=CHR$ 


(284)+CHR$(288):q9$=CHR$(20!)+CHR$(2 
82):q!8$=CHR$<203)+CHR$(284) 

978 ql1$=CHR$(247)+CHR$(245):q!2$=CH 
R$(248)*CHR$<244):q!3$=CHR$(214)*CHR 
$(215):q!4$=CHR$(2i4)+CHR$(217):q!5$ 
=■ ‘+CHR$(249) :ql4$=CHR$(251)-tCHR$(2 
58):q!7$= r MCHR$(222) :q!8$=CHR$(207 
)+CHR$(287) 

980 RETURN 

998 '********subrutina de pantal1 a*# 
******** 

1808 FOR i=l TO 118 :e(i)=l:NEXT 
18ie FOR i=i TO 188 STEP !2:e(i)=0:e 
< i-1 )=8 :NEXT 

1828 FOR i=l TO 12:e(i)=8:e<i+P6)=@: 
NEXT 

1038 PEN 1:LOCATE 31,21:PRINT q!8$:L 
OCATE 31,22:PRINT ql8$ 


1858 RESTORE:FOR n=l TO dal :READ o,p 
:NEXT 

1048 FOR e=l TO du:READ h,p 

1878 LOCATE h,p:PRM qll$:LOCATE h, 

p+1 :PRINT ql2$ 

1080 NEXT e 
1899 PEN 3 
1108 FOR n=l TO 3 

1118 READ J,K:LOCATE j,k:PRlNT q9$:L 
OCATE j,R+1:PRINT ql0$ 

1128 NEXT 

1130 LOCATE 11,3:PRINT*FASE NUMERO:" 
;pan 

1148 LOCATE 7,5:PR1NT"MISI0N:SAL IR C 
ON LAS LLAVES ‘q$ 

1158 PEN 2:L0CATE a,d:PRlNT q3$:L0CA 
TE a,d+1SPRINT q4$ 

1148 LOCATE 34,7:PRINT'TANTE0" 

1179 nian=0:q=l:u=l 

1180 IF ro=4 THEN READ i,s:LQCATE i, 



s:PRM q 1$:LOCATE i,s+l:PRJNT q2$ 
1198 RETURN 

1288 '************prinera pantalla** 
******** 

1210 PAN=1:ida=l:da!=38 :du=15 
1228 GOSUB 1888 

1230 e(18)=8:e(27)=0:e(33)=8:e(48)=8 
:e(41)=8:e(45)=0:e(52)=8:e(53)=8:e(5 
9)=0:e(44)=8:e(47)=8:e(78)=8:e<88)=8 
:e(91)=8:e(79)=8:e(23)=2:e(43)=2:e(8 
4)=2 


1240 RETURN 

1258 '**************segunda pantalta 
************ 

1240 a=il:d=9:m=14:man=B:ida=2:pan=2 

:da!=4?:du=17 

1278 GOSUB 1088 

1288 e(15)=0:e(28)=8:e(27)=8:e(35)=8 

:e(48)=8:e(4D=8:e(45)=8:e(52)=0:e(5 

3)=8:e(48)=0:e(71)=0:e(78)=B:e(84)=8 

:e(87)=8:e(94)=8:e(17)=8:e(23)=2:e(2 

8)=2:e(94)=2 

1298 GOTO 128 

1388 '***********tercera pantal1 a*** 
*********** 

1318 pan=3:ida=3:dal=48:du=21:a=11:d 

=9:m=14:man=8 

1328 GOSUB 1808 

1338 e<15)=8:e(18)=B:e(23)=8:e(27)=B 
:e(28)=8:e(33)=@:e(39)=0 :e(41)=8:e(4 
5)=0:e(53)=8:e(7B)=8:e(71)=8:e(74)=8 


NT' 


FOR j=1 TO 14:LOCATE 11,8+J:PRI 
* :NEXT J 
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:e<?5H:e<?8)=0:e<81)=0:e<86)=8:e<8 

7) =ffl»(B9)=0:e(9B)=B;e(91)=B:e<48)=2 
:e(17)=2:e(83)=2 

1348 GOTO 120 

1358 '***********cuarta pantalla**** 
******* 

1360 pan=4:ida=4:dal=91:du=26:a=ll:d 
=9:i?Fl4:iaan=8:ro=4:xl=15:yl=21 :x2=BB 

1379 GOSUB 1080 

1380 e(18)=8:e(20)=0:e(22)=0:e(23)=0 
:e<27)=8:e(28)=8:e(35)=8se<45)=8:e(5 

8) =0:e(52)=9:e(57)=0:e(59)=8:e(62)=0 
:e<67)=8:e<70)=0:e<71)=8:e(74)=B:e(7 

5) =8 

1390 e(78)=8:e(81)=0:e(86)=8:e<8?)=2 
:e<90)=8:e(91)=B:e(88)=8:eti9)=8:e(4 

6) =2:e(83)=2:e(89)=2 
1488 GOTO 128 

1418 '**********quinta pantalla***** 
******* 

1429 pan=5:ida=5:dal=l21:du=23:a=l1: 
d=9 :m=14 :rsan=0 :ro=8 

1430 GOSUB 1808 

1448 e(15)=B:e(18)=0:e(22)=0:e(23)=0 

:e(27)=8:e<41)=8:e(43)=0:e<45)=0:e<5 

B)=8:e(59)=8:e(62)=8:e(64)=8:e(66)=0 

:e(68)=0:e(78)=0:e(71)=0:e(75)=8:e(7 

8)=0:e(79)=8:e(83)=0:e(89)=0:e(98)=8 

:e<91)=8:e(17)=2:e(74)=2:e(92)=2 

1458 GOTO 120 

1468 '************sexta pantalla*)** 
************* 

1470 pan=6:ida=6:dal=147:a=ll:d=9:r?ia 
n=8 :ro=4:du=2i:x 1=11 :y 1=19 :x2=74:ii=1 
4 

1488 GOSUB 1800 

1490 e(18)=8:e(22)=8:e(27)=8:e(28)=8 

:e(33)=8:e(3?)=8:e(41)=8:e(44)=0:e(5 

8)=0:e(66)=8:e(67)=8:e(70)=9:e<7!)=0 

:e(74)=8:e(75)=0:e(77)=8:e(B7)=0:e(8 

8)=0:e(91)=8:e<92)=B:e(23)=2:e(62)=2 

:e(89)=2:e<86)=2 

1500 GOTO 128 

1510 '**********septina pantalla**** 
******* 

1528 pan=7:ida=7:dal=171:a=l1:d=?:ma 

n=0:ro=8:du=22:ii=14 

1538 GOSUB 1000 

1540 e(19)=0:e(23)=8:e(27)=0:e<28)=8 

:e(33)=0:e(39)=0:et41)=8:e(43l=8:e(4 

5)=0:e(46)=0:e<53)=8:e(57)=0;e(64)=0 

:e(67)=8:e(68)=0:e(78)=8:e(71)=0:e(7 

4)=0 :e(75)=0:e<79)=0:e(94)=0:e < 40)=2 

:e(59)=2:eu6i=2 

1550 GOTO 120 

1560 '***********octava pantalla**** 
**** 

1570 pan=8:ida=8:dal=196:a=ll:d=9:ma 


n=0:ro=4:du=24 :r*=14:xl=ll :yl=l?:x2=6 

2 

1580 GOSUB 1800 

1590 e(15)=8:e(18)=8:e<22)=8:e(27)=0 
:e(28)=8:e(33)=8:e(39)=8:e(41)=0:e<4 

2) =8:e(43)=8:e(46)=0:e < 53)=0:e(57)=8 
:e(62)=0:e<66)=8:e<67)=8:e(71)=8;e(7 
5)=0:e(79)=0:e(86)=8 

1688 e(87)=0:e<88)=0:e(89)=0:e<94)=@ 
:e(17)=2:e<40)=2:*(23)=2:e(74)=2 
1610 GOTO 120 

1628 '************novena pantalla*** 
****** 

1638 pan=9: ida=9:dal=224:a=l! :t*=9:ma 

n=8:ro=8:du=25:ra=14 

1640 FOR j=l TO 14:LOCATE ll,8+j:PRI 

NT 1 1 iNEXT j 

1650 LOCATE 15,12:PRM'FASE OSCURA* 

1660 LOCATE M^sPRlNT 1 BOMBILLAS: 

• ;UNO 

1678 IF uno=3 THEN LOCATE 17,17:PRIN 

T’HAY LUZ“:GOTO 1698 

1680 LOCATE 16,17:PRIMT*NO HAY LU2 1 : 

qll$=’ ’:ql2^=’ 1 

1690 FOR 3=1 TO 2506:NEXT 

1788 GOSUB I860 

1710 e(18)=8:e(19)=0:e(22)=0:e(27)=0 
:e(28)=0:e(33)=8:e(40)=@:e<42)=8:e(4 

3) =8:e(44)=8:e(46)=0:e(62)=8:e(66)=0 
:e(67)=B:e(71)=0!e(74)=6:e(75)=0:e(7 
8)=0:e<79)=B:e<86)=0:e<87)=8:e(88)=8 
:e(89)=0 

1720 e(90)=8:e(91)=0:e(94j=0:e<20)=2 

:e<23)=2:e(89)=2 

1739 GOTO 128 

■748 '**fi*******decina pantalla***** 
*** 

1756 GOSUB 960 

1768 pan=18:ida=18:dal=252:a=ll:d=9: 
raan=0:ro=8:du=28:nt=14:q?$=“ ’ :ql04= 
CHR$(224)+CHR*<223) 

1778 GOSUB 1888 

1788 e(15)=0:e<l?)=0:e(19)=8:e(20)=8 

:e(27)=8:e(33)=8:e(35)=8:e(39)=8:e(4 

l)=8:e(42)=8:e(44)=0:e(45)=8:e(53)=8 

:s(57)=0:e(59)=0:e(62)=8:e(64)=B:e(6 

7)=0:e(71)=8:e(75)=0 

1790 e(77)=0:e(79)=0:e<81)=8:e<86)=6 

:e(91)=8:e(92)=0:e(94)=0:e(83)=2:e<2 

3)=2:e(87)=2 

1888 GOTO 128 

1810 '***********datas************* 

1828 DATA 29,21,27,19,25,21,23,19,25 

,17,23,15,21,15,19,15,17,17,15,19,13 

,17,13,15,11,13,11,11,11,9 

1836 DATA 29,21,29,21,27,19,25,21,23 

,19,25,17,27,15,29,13,27,11,25,9,23, 

11,21,11,19,11,17,11,15,9 


1840 DATA 19,9,13,11,25,11,15,13,17, 

13.25.13.15.15.17.15.29.15.15.17.21, 

17.27.17.21.19.15.21.21.21.29.9.21, ! 

3,11,21 

1858 DATA 13,9,17,9,23,9,13,11,29,11 
,15,13,17,13,25,13,15,15,17,15,23,1? 
,29,17,19,19,11,21,13,21 ,23,21,27,2! 
,29,9,15,11,15,21 

1860 DATA 13,9,19,9,29,9,13,11,15,11 
,25,11,13,13,17,13,25,13,17,15,27,1? 
,29,17,11,19,13,19,19,19,25,19,11,21 
,13,21,17,21,19,21,21,21,17,9,15,13, 


29,19 

1878 DATA 19,9,21,9,23,9,27,9,29,9,1 
3,11,15,11,29,11,25,13,11,15,15,15,2 
5,15,29,15,11,17,21,17,27,17,29,1?,! 

1.19.13.19.19.19.25.19.11.21.15.21.1 

9.21.21.21.17.21.27.13.29.19.13.21 
1888 DATA 13,9,19,9,27,9,29,9,13,11, 
17,13,21,13,25,13,11,15,29,15,11,17, 
15,17,19,17,23,17,27,17,29,17,13,19, 

19,19,21,19,29,19,17,21,19,21,21,21, 

11.19.17.9.23.21 

1890 DATA 19,9,27,9,13,11,15,11,25,1 

1.13.13.17.13.27.13.11.15.19.17.21.1 

7.27.17.29.17.11.19.13.19.17.19.13.2 

1.15.21.21.21 ,23,21,29,9,11,17,17,21 

, 11,21 
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2188 SOUND 1,586,188,7 

2118 SOUND 2,426,25,8:SOUND 2,426,75 

2128 SOUND 4,319,50,8:SOUND 4,319,50 

,i 

2130 SOUND 1,568,300,6 

2148 SOUND 4,284,100,8:SOIND 4,284,2 

5,6:SQUND 4,239,58,6:S0UND 4,190,125 

,<5 

2150 FOR b=l TO 808:A$=INKEY$:IF A$= 
■s' OR A4=’S’ THEN GOTO 108 ELSE NEX 
T b 

2160 RETUffl 

2170 '*********terniinar********* 

2180 CLS:CLEAR:GOSUB 960:PEN 1:F0R n 
=1 TO 48 STEP 2:LOCATE n,2:PRINT qll 
4:LOCATE n,3:PRINT ql24:LQCATE n,22: 
PRINT ql14!LOCATE n,23:PRINT ql24:NE 
XT 

2198 FOR n=l TO 22 STEP 2:L0CATE l,n 
+1;PRINT ql1^:LOCATE l,n+2:PRINT ql2 
4:L0CATE 39,n+1sPRINT qll4:LOCATE 39 
,n+2:PRINT ql24:NEXT 
2208 PEN 3:L0CATE Sj^rPRINT 1 ENHORA 
BUEWt!!!! LO CONSEGUISTE!! 1" 

2218 FOR i=l TO 4 
2228 GOSUB 2878 

2238 PEN 2:F0R n=10 TO 38 STEP 2:L0C 
ATE n,10:PRINT q34:LQCATE n,ll:PR1NT 
q44:L0CATE n,15:PRINT q34:L0CATE n, 
16:PRINT q44:F0R rt=l TO 38-.NEXT rt: 
LOCATE n,18:PRlNT’ *:L0CATE n,ll:PR 
]NT* LOCATE n,15:PRlNT" 1 :LOCATE 
n,14:PRINT’ ’:NEXT n 
2248 NEXT i 

2250 PEN 1sLOCATE 13,18:PRINT‘PULSA 
LA TECLA ALLOCATE 11,20:PR1NT‘PARA 
JUGAR OTRA VEZ" 

2260 IF INKEY<69)=8 THEN RUN ELSE GO 
TO 2268 


1980 DATA 21,9,29,9,13,11,15,11,25,1 

1.13.13.27.13.21.13.25.13.27.13.17.1 

5.25.15.15.17.21.17.23.17.27.17.29.1 

7.11.19.13.19.21.19.17.21.27.21.15.1 
3,29,15,11,21 

1910 DATA 13,9,19,9,27,9,13,11,15,11 

,25,11,13,13,17,13,19,13,21,13,27,13 

,17,15,25,15,11,17,19,17,21,17,29,17 

,13,19,21,19,11,21,13,21,15,21,17,21 

,27,21,17,9,29,9,15,13,11,19 

1928 DATA 19,9,21,9,27,9,13,11,15,11 

,25,11,15,13,19,13,21,13,23,13,27,13 

,11,17,19,17,21,17,29,17,11,19,13,19 

,19,19,21,29,11,21,13,21,15,21,19,21 

,21,21,27,21,23,9,29,9,17,21 

1938 DATA 13,9,17,9,19,9,21,9,23,9,1 

3.11.25.31.29.11.13.13.17.13.19.13.2 

3.13.25.13.17.15.25.15.29.15.11.17.1 

5.17.21.17.29.17.13.19.17.19.21.19.2 
5,19,11,21,21,21,23,21,27,21,29,9,13 
,21,29,19,11,19 

1948 '********abre puertas de bonbil 
las****** 

1950 LOCATE xl,ylsPRINT’ ‘:LOCATE x 
1 ,yl+l:PRINT“ ■:e<x2)=l 
1960 RETUffl 

1970 ' *******instrucciones******* 
1988 PEN 2:LOCATE 13,3iPRINT"1NSTRUC 


Cl ONES*:PEN 3 

1998 PRINT:PRINT‘ Este es un diuer 
tido juego en el cualtu ratsion consi 
ste en atravesar el labe-rinto de la 
s 18 Eases.’ 

2880 PRINT:PR1NT‘ Ten cuidado ya q 
ue las paredes estan electrizadas,en 
cotraras minas explosiwasno las toqu 
es,tai*bien hay una molesta bota la 
cual intentara pisarte." 

2010 PRINTsPRINT’ Para pasar de un 
a Ease a otra debes caserle todas 1 
as Erutas que encuentres en la Ease 
donde estes." 

2828 PRINT:PRINT’Las teclas para isou 
er tu escarabajo: AsArriba 

2:Abajo Eslzquer 

da >:Derecha' 

2838 PRINT SPRINT* PULSA LA TECLA 
S PARA JUGAR’ 

2048 GOSUB 2870 
2850 GOTO 2840 

2068 '*******nujsica********* 

2870 SOUND 1,478,108,6 

2880 SOUND 2,379,58,8:SOUND 2,379,50 

>i 

2898 SOUND 4,319,75,0sSOUND 4,319,25 


ES 






.v 


TANTEO 
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TOP-GUN (Idolos del Aire) 

Top Gun te coloca en la cabina de un 
TOMCAT F-14. Graficos vectoriales y la 
pantalla dividida permiten a 1 6 2 jugado- 
res luchar entre ellos o contra el ordena- 
dor. Tus armas en este combate, no apto 
para cardlacos, son misiles guiados por el 
calor, y una ametralladora de 20 mm. 


AVENGER (Way of The Tiger II) 

Primero fue “Way of The Tiger” en donde 
tuviste que demostrar tus habilidades para 
convertirte en Ninja. Ahora es “Avenger", 
en donde tendras que demostrar que, 
ademas de fuerte, eres habil e inteligente 
para conseguir veneer al Gran Guardian. 
Buena suerte... solo los bravos sobreviviran. 


GREAT ESCAPE 
(Gran Escapada) 

Alemania 1942. La guerra ha estallado y 
tu has sido capturado y condenado en un 
campo de concentration. Tu deber es es- 
capar. pero no te resultara facil. Necesita- 
ras planear cuidadosamente las acciones 
utilizando toda tu astucia para escapar 
con vida del campamento. 


Para que lo tengas facil. Aqui tienes una selection de los mejores juegos que puedes encontrar. 
Cualquiera de ellos tiene la garantia de calidad y adiccion que esperas encontrar en un videojuego. 
Para no llevarte “sorpresas”... elige un juego distribuido por ERBE en cualquiera de las 

buenas tiendas de informatics. 
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BREAK-THRU 


El mas espectacular de los juegos de las 
maquinas. Conduce un vehiculo especial 
evitando a los lanzallamas, helicopteros, 
tanques, jeeps y campos de minas enemi- 
gos. El medio para enfrentarte a ellos es 
el mas sofistlcado vehiculo armado del 
mundo. Preparate con el a atravesar. 
puentes, montahas, ciudades y aeropuertos. 


GOONIES 


Toda la emocion de la pelicula de Spiel¬ 
berg en tu ordenador. Exito masivo en 
America, el juego revive los peligros y la 
aventura de la pantalla grande, usando 
una especial tecnica de juego para 2 per- 
sonajes. Comparte las aventuras de los 
“Goonies" a traves de intrincados laberin- 
tos, donde te espera toda la action que 
oueoe darse en un juego. 


INFILTRATOR 

El juego que ha sorprendido en U.S.A. El 
mas complete de los programas que ha- 
yas visto, porque reime accion, estrategia 
y una increible simulation de vuelo en un 
helicoptero dotado de las mas avanzadas 
tecnicas. Infiltrator te sorprendera. 


RAMON RODRIGUEZ 


Como su nombre indica, un juego genui- 
namente espahol. Un Punki simpdtico y 
vacilon que se ve envuelto en las mas ab- 
surdas y divertidas situaciones de las que 
tienes que ayudarle a salir airoso. Ramon 
Rodriguez te hara compartir las aventuras 
y desventuras de un "Punki de Aki”. 


Cl. STA, ENGRACIA. 17 - 28010 MADRID. 
TFNO. 191)4473410 
DELEGACION BARCELONA, 

AVDA. MISTRAL N.' 10. TFNO. (93) 432 07 31 


COBRA 

Por primera vez un juego supera al film. 
Cobra (el juego) te sorprendera por su ac¬ 
tion y sus graficos, superiores, incluso, a 
los del "Green Beret". El crimen es una 
enfermedad...; tu, el remedio. 





































































on un perfecto y 
rapido vuelo se dirigio hacia los 
suburbios de la ciudad, donde 
sabfa cjue encontrarfa al cfnico 
Arlequin esperandole para tomar 
la revancha de la derrota que le 
habfa inflingido. 

Pero tambien sabfa que no le 
esperorfa en campo abierto. Sin 
duda, el Arlequin se esconderfa 
en su cueva repleta de mortfferos 
ingenios y trampas para jugar con 
toaas las cartas a su favor. 

Cuando llego a la oscura 
entrada, no vacilo al entrar, 
puesto que confiaba plenamente 
en sus sentidos murcielagos, y 
aunque estos eran formidables, no 
pudo darse cuenta de lo rapido 
que el suelo se abrfa bajo sus 
pies. 

Consiguio aterrizar bien, gracias 
a su agilidad, mientras pensaba 
que era ya el momento de la 
accion. 

Y si en ese instante BATMAN 
empezaba su aventura, nosotros 
en este empezamos a relatar uno 
de los juegos que podemos fildar 
de excelente. 

Las peripecias de este hombre- 
murcielago se desarrollan en un 
tipo de escenario grafico que en 
su tiempo, y aun hoy en dfa, 
causo furor; estamos hablando de 
la tecnica de «filmation», que 
inicio sus pasos con el conocido 
KNIGHT LORE. 

Algunos de los juegos que 
siguieron despues se conformaron 
con copiar esta magnffica tecnica, 
otros han intentado mejorarlos. 
BATMAN se encuentra entre estos 
ultimos. 

Lo primero que tenemos que 
destacar de este juego, bueno, 
mas bien de sus creadores, es el 
alarde imaginative del que han 
hecho gala. Si bien, el tema es el 
del tfpico arcade, las secuencias 



BATA/IAN 

AMSTKAD PCW 

Desde la azotea del rascacielos, la estatica figura observa el 
tranquilo transcurrir de la noche. Pero aunque intenta 
disfrutar de ello, un torbellino de ideas bombardea su mente, 
Antes pensaba que su mision seria mas simple, sin embargo, 
ahora que conocia las tretas de su enemigo, sabia que 
tendria que pelear fuerte y utilizer todos sus superpoderes 
para recuperar su maquina mas impresionante, el Batimovil, 
Si, Batman lucharia hasta el fin para recuperar esta 
maravilla de las manos del odioso Arlequin. 



graficas en que este se desarrolla 
son de una originalidad y simpatfa 
importante. 

Todo esto se ha podido 
elaborar, y muy bien por cierto, 
debido a la personalidad del 
enemigo de BATMAN; el malevolo 
Arlequin. 

En su cueva podremos ver los 
seres mas estramboticos; extranos 
perros, cabezas andantes, diablos 
que parecen de Tasmania, etc. 

Tambien son bonitas y originales 
las solas por donde veremos 
discurrir todos estos entes, ya que 
la cueva del Arlequin es una 
singular mezcla entre parque de 
atracciones y tetrico castillo 
medieval. 

BATMAN tiene que ir con los 
ojos muy abiertos para evitar los 
peligros que se ven, pero no 
puede olvidar que su oponente es 
amigo de utilizer escalones que 
desaparezean al pisarlos, trampas 
en los pasadizos, gases letales, y 
mucho mas... 

De la parte positiva, que no 
debemos olvidar, tenemos que 


nuestro heroe podra utilizar 
cuatro de sus especialfsimos 
aparatos, si consiaue recogerlos 
tambien de las solas donde 
Arlequin los ha dejado, claro esta. 

Las poderosas betas le 
permitiran dar saltos de gran 
magnitud; con la cesta podra 
recoger determinados objetos 
imprescindibles para su mision; 
con su propulsor ionico aumentara 
la velocidad de salto y podra 
planear; asf como su cinturon 
antigravedad hara mas lentas las 
cafdas. 

Cuando consigamos que nuestro 
superheroe reuna este portentoso 
equipo, sus dificultades se 
reduciran notablemente, aunque 
todavfa le quedara una ardua 
tarea debido a que el 
maquiavelico Arlequin ha dividido 
en siete partes de su coche, 
escondiendo cada una de ellas en 
una habitacion de su inmensa 
cueva. 

Asf que BATMAN comenzo a 
caminar por las extrahas 
habitaciones, preguntandose 
cuanto tardarfa en encontrar el 
primero de estos utiles aparatos. 
Afortunadamente, al cabo de 
poco rato vio en una sala la 
cesta, custodiada por un ente 
diabolico, lo esquivo habilmente y 
cogio su bolsa. Un par de 
habitaciones despues consiguio 
encontrar el lugar donde estaban 
las botas; entro y, despues de 
hacer una demostracion de 
equilibrio para no caer al vaefo, 
cogio las mismas. 

Aumentando su velocidad, pero 
sin dejar de memorizar el 
recorrido, BATMAN siguio 
recorriendo el galimatias que era 
la cueva de Arifequfn. 

Y asf fue recorriendo otra 
porcion de la cueva hasta que 
ilego a la habitacion donde 
estaba el propulsor y se lo coloco 
con una sonrisa. Ya solo le 


28 AMSTRAD ESPECIAL 

























quedaba encontrar uno de los 
portentosos aparatos de su 
equipo. 

Atraveso un extrano puente que 
se deshacfa ai pisarlo. Siguio 
reconociendo habitaciones, y al 
abrir Sa puerta de una de ellas vio 
Io que tanto habi'a buscado: el 
cinturon. 

Pero por la prisa que empleo 
para ir a recogerlo, no se percato 
de que, una vez mas, el suelo 
desaparecfa bajo sus pies. Pero en 
esta ocasion el propulsor 
consiguio que pudiera aterrizar sin 
consecuencias. 

En el suelo de la habitacion se 
elevaba una plataforma que 
parecfa llevar a pisos superiores, 
BATMAN salto a ella, y mientras 
subia, descubrio otra plataforma 
donde estaba la ultima, y por lo 
tanto anhelada, pieza de su 
equipo. BATMAN sabfa que con 
este completo su mision ya casi 
estaba realizada. 

Otro factor que hard mas facil 
o differ nuestra tarea seran las 
figuritas, con forma de BATMAN, 
que Arlequin ha colocado en 
algunas estancias y corredores. 

Unas consiguen que nos 
movamos con mas rapidez; otras, 
que podamos hacer 10 super 
saltos; las terceras, que nuestros 
enemigos se vuelvan inofensivos; 
asf como las cuartas y quintas dan 
y quitan una vida 
respectivamente. 

Despues de tomarse un respiro, 
BATMAN empezo a realizar la 
busqueda del objeto que 
realmente le habfa llevado allf, el 
fantastico Batimovil. 

La primera pieza del mismo, 
una aleta, se hallaba en una de 
las habitaciones inferiores. Para 
cogerla desdeno una falsa 
escalera de cubos, que era una 
trampa, y coloco una pieza que 
encontro bajo el cubo que habfa 
junto a la aleta y salto. El cubo se 
deshizo y la aleta cayo ai suelo, 
la cogio y siguio su camino. 

La segunda la encontro tras una 


intrincada ascension en una 
solitaria habitacion. Si hubiera 
caido, tendrfa que haber vueito a 
subir, perdiendo con ello un 
tiempo precioso. 

Pero esto no ocurrio, y raudo 
fue a buscar la tercera pieza. Esta 
aparecio en una excentrica sala 
donde subfan y bajaban dos 
embolos. Como era muy accesible 
el lugar donde estaba, no le 
supuso mucho esfuerzo el cogerla. 

La quinta, otra aleta, se 
encontraba en una habitacion, 
donde todo se habfa planeado 
como una trampa mortal. Nada 
mas entrar en ella BATMAN oyo 
un fuerte zumbido Levanto los 
ojos, y apenas tuvo tiempo de 
apartarse para esquivar la 
enorme piedra que le vern'a 
encima. Despues de recuperarse 
de la impresion, se dispuso a 
abandonar la habitacion, que 
parecfa no contener nada, cuando 
un brillo azulado en un laberinto 
de zetas llamo su atencion. 
Evitando tocar las paredes liego 
hasta el lugar donde se vefa el 
fulgor y descubrio que se trataba 
de la quinta pieza. 



No muy lejos de la anterior 
encontro Ig sexta. Para llegar a la 
sala donde estaba habfa que 
recorrer un corredor plagado de 
obstaculos. Cualquier error 
conducfa al abismo. BATMAN 
logro pasar sin percance alguno, 
gracias a su excepcional sentido 
del equ 1 brio, y recogio la pieza 
que se encontraba en lo que 
parecfa ser la imitacion de un 
castillo. 


Con la certeza de poder 
conseguir recuperar su Batimovil, 
BATMAN prosiguio la busqueda de 
la septima pieza. 

Pero esta se encontraba muy 
bien escondida y requirid que 
nuestro heroe tuviera que recorrer 
innumerables habitaciones. 
Empezaba el desanimo a hacer 
mella en el, cuando entro en una 
habitacion con tres teteras y una 
serie de cubos formando puente 
sobre los que descansaba una 
esfera con una interrogacion. 
BATMAN comprendio de repente y 
se puso a trabajar. 

Situo dos teteras junto a la 
puerta formando tope. Trepo por 
el puente de cubos y empujo la 
bola que rodo hasta detenerse 
junto a las teteras. Con sumo 
cuidado separo estas y se situo 
tras la bola. Tomo impulso y la 
lanzo a rodar bajo el puente de 
cubos. La bola choco contra un 
objeto y lo arrastro al exterior. La 
ultima pieza del coche estaba en 
su poder. 

Como se puede ver, en este 
juego no faita emocion y 
actividad, esta incluso la 
podrfamos definir como febril. 

Si hablamos a nivel grafico, no 
podemos olvidar que en esta 
ocasion el juego va dirigido 
a los PCW, y que en estos 
el monitor es de fosforo 
verde, o sea, debemos 
olvidarnos del color, o 
por lo menos de todo 
io que no sea verde. 

Si bien esto no 
podrfa importer en 
otro juego, no ocurre 
en este, debido a que 
en los CPC se 
desarrolla en pantallas 
casi monocromas, asf 
que no nos perdemos un 
gran colorido. 

El movimiento sf que es 
realmente bueno, rapido y 
divertido. 

Es realmente gracioso observar 
como se pone nuestro heroe en 
«jarra$» y golpea el suelo 
nerviosamente con su pie, cuando 
le hemos hecho pararse durante 
un rato. Es como si dijera: «£d 
que esperas?». 

Si a este acertado movimiento le 
anadimos unos dibujos muy 
buenos y una trama, aunque ya 
clasica, ilena de peripecias, 
formaremos un «cocktaiI» que 
logrard entretenernos. 
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os elementos principales del 
joystick son: la base o carcasa, 
la empunadura, el sistema de 
articulacion y los elementos electricos. 
Cada uno de ellos juega un importan- 
te papel y solamente un buen resulta 


do conjunto podra ofrecer la garan 
tia de transferir eficaz y rapidamente 
al ordenador vuestos movimientos. 

La empunadura (stick), es el primer 
eslabon de la comunicacion, las carac- 
teristicas particulares de este elemen- 
to son las que confieren al periferico 


una buena parte de su comodidad de 
uso, por ello, su diseno se realiza en 
base a conceptos anatomicos, si bien 
solo son unos pocos los modelos del 
mercado que logran una buena adapta- 
bilidad a la mano del jugador y asi per- 
mitir un uso prolongado consiguien- 


De ordinario la eleccion de perifericos para 
ordenadores suele realizarse tras la valoracion 
personal de las caracteristicas tecnicas del 
producto; sin embargo, en los joysticks la mayon'a 
de estos son subjetivos y solo la experiencia de 
uso nos puede conducir a una acertada 
valoracion. Con este articulo intentamos ayudaros 
informandoos de los que hay en el mercado. 









































do con ello la minima fatiga muscular. 

La operaiividad de la empunadura 
es poder efectuar los desplazamientos 
correspondientes a las cuatro posicio- 
nes (N, $, E y O) que posteriormente 
analizara el ordenador y sus combina- 
ciones de movimientos diagonales 
{NO, NE, SO y SE). 

Una rotula esferica sirve de elemen 
to de union entre el stick y la carcasa, 
union que debe permitir un suave des- 
plazamiento del stick, esta suavidad de 
desplazamiento y la ausencia de hol- 
guras en el mecanismo determinara la 
precision del joystick. El otro extremo 
de la empunadura queda situado en 
tre cuatro microruptores que son acti- 
vados o desactivados al alcanzar ei 
stick la situacion correspondiente. La 
construccion de estos contactos varia 
desde simples laminas flexibles hasta 
microruptores mecanicos (reconocibles 
por su «clic» caracteristico) e incluso 
simples circuitos impresos superpues- 
tos que generalmente estan integrados 
en una pieza de plastico que a veces 
llega a efectuar las funciones de la ro 
tula. 

A fin de que la empunadura retor 
ne a su posicion central (neutra), un 
sistema de resortes o masas eldsticas 
(gomas) unidas a la parte inferior de 
la rotula realizan tal operacion. 

La robustez de todo este conjunto 
mecanico es un factor determinante 


para aquellos que dia a dia se enfren- 
tan a duras batallas. 

MECANISMOS 
DE DISPARO 

Para la ejecucion de disparos (o sal- 
fos) hay gran variedad de versiones, 
para ello se dota al joystick de varias 
posibilidades, tantas como hdbitos 
puedan tener los jugadores. 

Generalmente estos se producen al 
pulsar algun boton de diferentes for¬ 
mas y tamanos que se encuentran dis 
tribuidos en la empunadura y/o la ba 
se. 

Lo mas habitual es que en la empu 
nadura haya al menos un pulsador al 
alcance del dedo pulgar y a veces se 
complemente con otro a modo de ga- 
tillo, accionable con el indice. Tam 
bien, la carcasa puede tener uno o va- 
rios pulsadores de efecto semejante a 
los del stick, todos estos pulsadores es 
tan concentrados electricamente en 
paralelo pudiendo efectuarse el dispa 
ro desde cualquiera de ellos. Algunos 
modelos estan complementados con 
un interruptor de disparo perrmanen- 
te que sirve de gran ayuda en los jue- 
gos de trepidante accion (salvo en 
aquellos en los que la energia es en 
funcion inversa a los disparos). 

En este capitulo es destacable la im- 
portancia de la recuperacion de todos 
y cada uno de los ruptores a fin de que 
esta no ralentice la sucesion de dispa 
ros en rafaga. 

LA SUjECION 

La carcasa o base del joystick cum 
pie una doble mision, una, la de alber 
gar en su interior todos los mecanis- 
mos descritos anteriormente, la otra, 
la de ofrecer una gran sujecion del 
conjunto a la superficie de la mesa en 
el caso de estar prevista para ello o 
la de acomodarse a la mono en aque¬ 
llos tipos de joystick disenados para es¬ 
te modo de utilizacion. 

En el primer caso la sujeccion del 
joystick viene realizandose a base de 
unas ventosas que, dispuestas en su 
parte inferior, los inmovilizan suficien- 
temente. La mayori'a de los modelos 
analizados poseen cuatro ventosas 
con la unica excepecion del Quick Shot 
V que utiliza cinco, por otra parte pa 
recen haberse puesto de acuerdo to¬ 
dos los fabricantes en el tamano de es- 


tas..., todas ellas son de 30 mm de dia- 
metro. Sin embargo, el grado de su¬ 
jecion no solo esta en funcion del nu 
mero de ventosas sino que tambien tie- 
ne su importancia la base de susten 
tacion que estas proporcionan y la Ion 
gitud del stick, puesto que a mayor 
longitud de este mayor empuje habra 
de soportar la base. 

CONEXION 

La descripcion del joystick queda 
completada con una pequena alusion 
al cable de conexion en el que cabe 
destacar la importancia de una longi¬ 
tud que permita su manipulacion a 
una distancia apropiada que casi to¬ 
dos poseen. 

Por otro lado, la calidad del cable 
de conexion aunque no es influyente 
en la manipulacion del periferico si 
puede ser indicativo de la calidad ge¬ 
neral. 

DESARROLLO 

En los ultimos anos la evolucion de 
este periferico ha alcanzado cotas 
muy altas pero sigue siendo el diseno 
clasico el de mayor difusion, desarro 
llandose multitud de nuevos modelos 
mas ergonomicos, comodos y durade- 
ros, incorporando a ellos ingeniosos 
complemento$ al efecto como bases 
mas amplias (Quick Shot III y V, Co¬ 
bra), mini teclados para introduccion 
de niveles de dificultad y numero de 
jugadores (QSV), utilizacion de meca- 
nismos de alta calidad (baza que ga- 
na el Cobra), etc. 

En cuanto a los modelos mas avan 
zados estos presentan innovaciones 
realmente ingeniosas y de conceptos 
absolutamente distintos de lo habitual, 
bien que su aplicacion debe ser enjui- 
ciada segun cada particular. 

Modelos como el Cheetach de man- 
do a distancia evitan el a veces engo- 
rroso cable de conexion, si bien pue¬ 
de «jugarosla» durante una partida si 
en un momento de exaltacion lo des- 
viamos de la direccion del interface re¬ 
ceptor. Sistema muy similar utiliza el 
Quick Shot VII, pero sin dejar a un la¬ 
do el cable conector. 

El Joycard, es un reducido teclado 
que incorpora un joystick y un par de 
pulsadores en simulacion a las «maqui- 
nitas» de los bares. 

Quizas el modelo de mas irnpacto 
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visual sea el ultimo de la extensa saga 
de Quick Shot, la version nueve, una 
enorme bola de 10 cm de diametro 
movible en cualquier direccion, dota- 
da de una gran precision y que incor¬ 
pora dos teclas de gran dimension pa 
ra disparo y complementado con un 
par de interruptores que permiten las 
opciones de fuego automatico e inver¬ 
sion de sentido de desplazamiento, 
haciendo posible distintas situaciones 
del aparato. 


Commando 


Joystick 


EL PRECIO DEL PODER 


Realizar un analisis de precios co- 
rrespondientes a cada modelo de 
joystyck de una forma fehaciente no 
es tarea facil dado que generalmente 
se encuentran formando parte de 
atractivas ofertas, cuando no se inclu- 
yen en la compra del ordenador, pe- 
ro orientativamente oscilan alrededor 
de las 2.000/3.000 ptas. los modelos 
mas convencionales, alcanzando 
10.000 y 12.000 los modelos mas pre- 
cisos y/o sotisficados. 


Commodore 


Investick 


Capitan Grant 


Cheetah 


Cobra 
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Quick Shot 


Toshiba 


Superstick 


Kempston 


Quick Shot 

VII 


Quick Shot II 


x 


Quick Shot V 
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CARACTERISTICAS TECNICAS 

MODELO 


EMPUNADURA 

BASE 

DIMENSIONES (cm) 


Tipo 

Disparo 

Altura 

Sujecion 

Disparo 

ToTales 

Cable 

CAPITAN GRANT Anatom 

1 pulsador 

12 

Manual 

1 pulsa. 

13x10x16 

125 

CHEETAH 

Anatom. 

1 pulsador 


Manual 


16x6.5x2.5 

Mando distancia 

COBRA 

Anatom. 

2 pulsad. 

1 gatillo 

16 

4 ventosas 


14x12.5x24 

4.5x3x17 

135 

170 

COMMANDO 

Anatom. 

1 pulsador 

3 



COMMODORE 

Lisa 

1 pulsador 

7,5 

Manual 

1 tecla 

10x7x11 

127 

GRAN CAP. II 

Anatom. 

1 pulsador 

12 

Manual 

2 pulsad. 

12x12x16.5 

125 



1 gatillo 



: AUTO 

13x11x16 

125 

GUN SHOT 

Anatom. 

1 pulsador 

13,5 

4 ventosas 

1 pulsad. 

INVESTICK 

Anatom. 

1 pulsador 

1 gatillo 

13,5 

4 ventosas 

2 pulsad. 

13x10x18 

18x10x6.5 

104 

27 

JOYCARD 

de bola 

4,5 

sobremesa 

2 pulsad. 

JOYSTICK 

Anatom. 

1 pulsador 

1 gatillo 

13 

4 ventosas 

2 pulsad. 

13.5x10x17 

124 

120 

KEMPSTON 

de bola 

7 

Manual 

2 pulsad. 

11x5x9x11 

KEMPSTON 3000Anatom. 

1 pulsador 

12 

Manual 

1 tecla 

13x7.5x16 

160 



1 gatillo 




13x8x10 

135 

KONIX 

de bola 

1 gatillo 

6 



PROTO 

Anatom. 

1 pulsador 

1 gatillo 

1 pulsador 

12 

4 ventosas 

1 pulsad. 

12x12x15.5 

126 

QUICK SHOT 1 

Anatom. 

12 

4 ventosas 

1 pulsad. 

11x9x16 

126 

QUICK SHOT II 

Anatom. 

1 pulsador 

13.5 

4 ventosas 

1 pulsad. 

13x9.5x 17.5 

126 



] gatillo 



+ AUTO 

19x10x17 

126 

QUICK SHOT III 

Anatom. 

1 pulsador 

12 

5 ventosas 

2 pulsad. 



1 gatillo 



TECLADO 


126 

QUICK SHOT V 

Anatom. 

1 pulsador 

12 

4 ventosas 

1 tecla 

19x9.5x17 



1 gatillo 




12x9x2.5 

126 

QUICK SHOT VII 

Disco 

2 gatillos 




QUICK SHOT IX 

Esfera 

10 

4 ventosas 

2 teclas 

22x14.5x12 

121 


10 cm 




H AUTO 



SUPERSTICK 

Cilindro 

1 pulsador 

10 

Manual 


9x9x13 

157 

TOSHIBA 

Anatom. 

1 pulsador 

11 

Manual 

1 tecla 

13x10x18 

104 

VALORACION 

MODELO 


GRADO DE 

SUAVIDAD 

SUAVIDAD 

ADAPTACI0N 

R0BUSTEZ 

C0M0DIDAD 



SUJECION 

DE MOVIM. 

DE DISP, 

A LA MAN0 

MECANIS. 

US0 PROLONG. 

CAPITAN GRANT 



* * * 

* * * 

* * * * 

* * * 

* * 

CHEETAH 



* * 

* * * 

* * * * 

***** 

* * * 

COBRA 


***** 

* * * * 

***** 

***** 

***** 

***** 

COMMANDO 



* * * 

* * * 

* * * * 

* * * * 

* * * 

COMMODORE 



* 

* * 

* 

* * * 

* 

GRAN CAP. II 


* * * 

* * * * 

* * * 

* * * * 

* * * 

* * * * 

GUN SHOT 


* * * 

* * * * 

* * * * 

* * * * 

* * * 

* * * * 

INVESTICK 


* * * 

* * * 

* * * 

* * 

* * 

* * 

JOYCARD 



* * * * 

* * * * 

* * * * 

* * * * 

* * * * 

JOYSTICK 


* * * 

***** 

* * * 

* * * 

* * * 

* * * 

KEMPSTON 



* * * * 

* * * * 

* * * * 

* * * * 

* * 

KEMPSTON 3000 


* * 

* * 

* * 

* * * 

* * 

KONIX 



***** 

* * * * 

***** 

* * * * 

* * * 

PROTO 


* * * 

* * * 

* * * 

* * * 

* * * * 

* * * * 

QUICK SHOT 1 


* * * 

* * * * 

* * * * 

* * * * 

* * * 

* * * * 

QUICK SHOT IS 


* * * 

* * * * 

* * * * 

* * * * 

* * * 

* * * * 

QUICK SHOT III 


***** 

* * * * 

* * * * 

* * * * 

* * * * 

***** 

QUICK SHOT V 


* * * * 

* * * * 

* * * * 

* * * * 

* * * * 

***** 

QUICK SHOT VII 



* * * 

* * * * 

* * * * 

* * * * 

* * * * 

QUICK SHOT IX 


***** 

* * * * 

***** 

***** 

***** 

***** 

SUPERSTICK 



* * * 

* * 

* * 

* * 

***** 

TOSHIBA 



***** 

***** 

***** 

* * * 

* * * 

— 
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COMERCIAL DE PROOUCTOS INFORMAT1COS Y ASESORAMIEN TO 


Presentamos la mas com- 
pleta gama de software para 
ordenadores Amstrad, IBM y 
Compatibles PC. 

Creado por las mas presti- 
giosas empresas de softwa¬ 
re de nuestro pais. 


SOFTWARE PARA AMSTRAD MODELOS CPC, 464 , 664, 6128 , PCW 8256 Y 8512 


OMICRON & PROA SOFT 


PROGRAMAS EDUCATIVOS CPC 
464 Y 6128 

— Aprendo a leer 

— Formulacion quimica 
Considerados como los mejores pro- 
gramas educativos del mercado 

FACTURACION CON ALMACEN 
CPC 464 Y 6128 

Sencilla y potente facturacion 


VALLES INFORMATICA S. A. 


CONTABIUDAD GENERAL PCW 
8256 Y 8512 

Completa y sencilla contabilidad para 
pequenas y medianas empresas. 

VISAJET, CPC 6128, PCW 8256 
Y 8512 

Impresionante BASE DE DATOS con 
menlalldad de 4, a generacion 


ZELIG INFORMATICA 


CONTABILIDAD+ IVA. CPC 6128 

La mas completa y facil manejo 

CONTROL DE STOCKS CPC 6128 

Controla el stockaje y proveedores, in- 
cluye una practica 

AGENDA ELECTRONICA 
FACTURACION, ALMACEN, 
PRESUPUESTOS 
PCW 8256 

Muy completa y de facil manejo 

FACTURACION, CONTROL 
DE STOCKS 

Mas que facturacion, es una PCW ges- 
tion comercial con iibro 8512 oficial de 
registro de IVA 

JUEGO DE OTHELLO PCW 
8256/8512 

Divertido juego de oficina que contem- 
pla la inteligencia Artificial 


DESSIN 


CONTABILIDAD PARA PYMES 

Integraclon ya incluida y poslbilidad de 
Hardisc 

FACTURACION, CONTROL DE 
STOCKS 

Integracion ya incluida y posibilidad de 
Hardisc 


DIMONI 


CONTABILIDAD PARA HARDISC 

Con modulos de ampliacion 

DIGES I 

Gestion comercial integrada 

DIGES II 

Gestion industrial integrada 


Encuentre nuestras aplicaciones en 
division Online de GALERIAS 


y comercios especializados. 


Para consultas de CPi asesores: 

Por h'nea telefonica al (96) 287 39 21 de lOh a 14h y de 17h a 20h de iunes a viernes. 
Por correo a CPi asesores, Passeig de les Germanies, 15. 46700 Gandia (Valencia). 











































Contabilidad General, 
Vencimientos 

Fco. Javier Barceld T. 

Dentro de los programas de gestion, los programas de contabilidad son los 
que mas abundan. Y el Amstrad PCW no va a ser una exception. Por eso, 
para facilitar la eleccion entre los diversos programas, hoy, AMSTRAD 
Semanal analiza Contabilidad General + Vencimientos. 



este programa, seguiremos la misma norma 
empleada en otros articulos, que no es mas 
que describir exhaustivamente todas sus po- 
sibilidades. Cuando se busca un programa de 
contabilidad, normaimente se tienen las cosas 
muy daras, sobre que se necesita y que no se 
necesita, por lo que lo mejor para elegir bien 
es saber que es lo que hace y como lo hace 
cada programa. Esperamos asi facilitar su 
eleccion. 



Para empezar, el programa no ofrece pro- 
blemas de instalacion. Se teclea el habitual co- 
mando SUBMIT, seguido del nombre del pro¬ 
grama (contable), y aparece la primera pan- 
falla, que advierte sobre la necesidad de co- 
piar al disco de datos los ficheros PLAN- 
CO.DAT y CONTAB.AUX para que el progra¬ 
ma no se cuelgue, o de errores. El programa 
de instalacion inicial copia todos los progra¬ 
mas en el disco virtual M: permitiendo asi in¬ 
troduce el disco de datos en la unidad A: y 
funcionar asi toda la sesion. 

Una vez instalado, aparece el menu princi¬ 
pal, donde estdn todas las opciones del pro¬ 
grama. Naturalmente, lo primero que hay que 
hacer es elegir la opcion I N.STALACION DEL 
PROGRAMA, para adecuarlo a nuestras ne- 
cesidades. En esta opcion se elige el tipo de 
papel que se va a usar, el nombre que apa- 
recerd en la cabecera de los listados, el nu- 


mero de UNIDADES de disco de las que dis 
ponemos y luego pregunta el numero de sub 
cuentas que vamos a necesitar. Este dato es 
vital, porque segun el numero de cuentas que 
introduzcamos, podremos disponer de mas o 
menos asientos. Una vez introducida la cifra, 
nos da el numero maximo de apuntes que ad- 
mite. 

Una vez hecho esto, el programa vuelve al 
menu principal. Las demas opciones de que 
dispone son: 

— Asientos contables. 

— Plan Contable. 

— Listado de Cuentas de Mayor. 

— Balance de Sumas v Saldos. 

— Cuenta de Resultados. 

- Soldo del IVA. 

— Vencimientos. 

Siguiendo un orden cronoloaico, logicamen- 
te lo primero sera dar de alia las cuentas, me- 
diante la opcion PLAN CONTABLE. Esta op¬ 
cion dispone de un submenu con las siguentes 
opciones: 

— Introduccion de Cuentas. 

— Modification de Cuentas. 

— Baja de Cuentas. 

— Consulta de Cuentas. 

— Listado de! Plan Contable. 

— Ordenacion de Cuentas. 

— Actualization de Saldos. 

— Poner los Saldos de las Cuentas 
a cero. 

Al seleccionar la introduccion de cuentas, 
pasamos a la pantalla que nos pregunta el nu¬ 
mero y el nombre de la cuenta. Si introduci- 
mos un numero de cuentas ya existente, nos 
aviso de ello. Existen cuatro niveles de cuen¬ 
tas, con uno, dos, tres y siete digitos respecti- 
vamente, y, ademas, el programa viene ya 
con parte del plan contable introducido, cosa 
que es de agradecer. Naturalmente, para los 

ue utilicen planes especiales, se pueden mo- 

ificar todas las cuentas, vengan con el pro¬ 
grama o las hayamos introducido nosotros. A 
la derecha de la pantalla, viene el espacio dis- 
ponible para seguir introduciendo cuentas, por 
lo que es muy imporfante calcular bien antes 


de iniroducirlo en la instalacion del program, 

Como las cuentas no tienen por que haber- 
se metido en orden, despues de dar de alia 
el plan conviene utilizer la opcion ORDENA¬ 
CION DE CUENTAS, que las clasifica nume- 
ricamente. Para prevenir cualquier fallo, es 
conveniente realizar antes una copia ae segu- 
ridad de los ficheros. 

Las demas opciones permiten modificar uno 
cuenta determinaday dar de baja una cuen¬ 
ta, siempre que esta tenga soldo cero, dado 
que si tiene movimientos no se puede anular. 
Despues de bajar alguna cuenta, tambienes 
necesario ejectuar la opcion de ordenacion de 
cuentas, para que el programa reconstruya el 
tndice de las mismas. 

La opcion CONSULTA DE CUENTAS per- 
mite consultar una cuen*a o grupo de cuen¬ 
tas, con el total de sus movimientos y su sol¬ 
do. Al preguntar al programa el numero de 
cuenta, si se le da un numero de una, doso 
tres cifras, presenta todas las cuentas que em- 
piece.i por el numero dado, mientras que si 
se le da un numero de siete cifras, presento 
los movimientos de esa cuenta solamente. 

La opcion LISTADO DEL PLAN CONTABLE 
proporciona un listado de todas las cuentas del 
plan, ordenadas numericamente. 

La opcion ACTUALIZACION DE CUENTAS 
pasa los saldos de las subcuentas a los de los 
cuentas de nivel superior, dejando los saldos 
de las subcuentas a cero. Antes de realizar este 
proceso es imprescindible hacer copias de se- 
guridad de los ficheros, asi como listar las 
cuentas del Libro Mayor y el Balance de Su¬ 
mas y Saldos a nivel 7. 

Volviendo al menu principal, una vez crea- 
do el plan contable, se puede empezar a in- 
troducir asientos. Al escoger la opcion ASIEN¬ 
TOS CONTABLES, aparece un submenu con 
las siguientes opciones: 

— Entrada de Asientos. 

— Anulacion de Asientos. 

— Libro Diario. 

— Ordenacion del Fichero. 

— Cierre Periddico. 

La introduccion de Asientos, eligiendo dicho 
opcion, resulta muy sencilla. Primero asigna 
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automaticamente el numero de partida, dato 
este que no se puede modificar. Luego pre- 
gunta la fecha, comprobando si es correcfa, 
si Numero de Subcuenta, si esta existe, visua 
liza $u nombre en la ultima Ifnea, y pregunta 
el conceplo, y si la partida es de Debe o Ha¬ 
ber. El programa comprueba que la cuenta in- 
troducida exista, asi como la fecha, aunque 
los apuntes no tienen por que ser introducidos 
cronologicamente, puesto que la opcion OR- 
DENAR FICHERO los reordena de esta ma- 
nera. Si se pulsa RETURN en un campo vado, 
aparece el valor del apunte que esta inmedia- 
tamente encima del actual, evitando asi tener 
que repetir —por ejemplo— el concepto va- 
rias veces. En el imports, si este fuera negati¬ 
ve, odmite el signo menos y, ademas, puntua 
a la inglesa. Es decir, las comas de seporacion 
de miles son puntos, y el punto decimal es una 
coma. La parte inferior de la panfalla mantiene 
informado sobre el soldo actual del diario, y 
si se desea salir de esta opcion estando la con 
tabilidad descuadrada, un mensaje lo avisa, 
pero permite salir volviendo a pulsar SAL. 

La pantalla tiene una ultima columna, lla- 
mada Ok. donde si el apunte es conforme, al 
pulsar RETURN se valida. En caso contrario, 
pulsando SAL se retorna al principio. Pero ade- 
mbs de esto, poniendo en esta columna una 
V, marca el asiento como el vencimiento pen- 
diente, pregunta la fecha de vetlcimiento del 
apunte. Esto posibilita el control de los venci- 
mientos de manera extremadamente comoda. 

El programa no tiene prevista la opcion de 
modificar asientos, por lo cual dado el caso, 
hay que anular el apunte incorrecto, e intro¬ 
duce de nuevo el apunte correcto. Dado que 
el programa ordena los apuntes por fechas, 
eso no resulia un gran problema, puesto que 
el diario permanece igual. 

La opcion de Listar el Libro Diario permite 
elegir entre que dos fechas se desea, y si se 
desea por pantalla o por impresora. Si se eli- 
ge el listado por Impresora, pregunta cual de¬ 
be ser el numero de la primera pagina, asi co 
mo la fecha que se desea que aparezea en el 
listado. 

Ya se ha dicho que la opcion ORDENA- 
CION DE ASIENTOS ordeno los apuntes cro¬ 
nologicamente, no obstante, si se ha efectua- 
do un cierre periodico en una fecha, y se in¬ 
troduce un asiento ANTERIOR a dicha fecha, 
el saldo de las cuentas no resultara exacto. 

La opcion CIERRE PERIODICO posibilita la 
introduction de mas apuntes, cuando se ha al- 


canzado el limite de la capacidad del disco. 
Para ello, actualiza los saldos de las cuentas, 
borra los asientos y conserva los saldos. Es de 
vital importancia que se haya hecho una co- 
pia de seguridad del fichero de asientos, pues¬ 
to que de lo contrario, seria imposible reme- 
diar una equivocation anterior a dicho cierre. 
Resulta conveniente, segun el numero de apun¬ 
tes que se realicen mensuaimente, hacer coin 
cidir este con algiin proceso de actualization 
de saldos, para dar mayor coherencia a la es- 
tructura de los ficheros. Esta es la ultima op¬ 
cion de ASIENTOS CONTABLES. 

Retomanao pues, el menu principal, la si- 
guiente opcion es el LISTADO DE IJENTAS 
DE MAYOR. Esta opcion presenta, bien por 
pantalla o bien por impresora, los movimien 
tos de la cuenta o cuentas que se le soliciten, 
entre dos fechas dadas. Al igual que en la con- 
sulta de asientos, si al pedir la primera y ulti¬ 
ma cuenta se introducen cuentas dt uno, dos 
o tres digitos, el listado se realize a parfir de 
estas cuentas y todas las de niveles inferiores. 
De introducir solo numeros de subcuentas, no 
listara los niveles anteriores. Ademas, si se con- 
testa en bianco a alguno de las dos pregun- 
tas, el programa interpreta que se desea des- 
de la primera cuenta y/o hasta la ultima. Si el 
listado es por impresora, tambien pregunta la 
fecha que se desea que figure en el listado. 

La siguiente opcion del menu principal es el 
BALANCE DE SUMAS Y SALDOS. Este lista¬ 
do, permite elegir el nivel de cuentas al que 
se desea, y su resullado depende directamente 
de dicho nivel. Si no se ha actualizado el fi¬ 
chero de asientos, se podra pedir a nivel 7, 
que es el maximo de desglose. Entonces, im- 
primira la suma del Debe y la del Haber, asi 
como el saldo de todas las subcuentas. Pero 
si se ha hecho ya el proceso de actualization, 
dado que las subcuentas estaran todas con sal¬ 
do cero, no tiene sentido. Pidiendolo a un ni¬ 
vel superior, los saldos de las cuentas refleja 
ran los movimienros acumulados. 


LA CUENTA DE RESULTADOS refleja el re- 
sultado economico del periodo. Tiene tres op- 
ciones: 

— Aportando stock final. 

— Aportando porcentajes sobre 

ventas. 

Stock inicial = Stock final. 

Con la primera opcion, el resultado es el mas 
aproximado, dado que sabiendo el stock final 
el programa obtiene el morgen real de bene- 
ficio que se esta cargando a los arficulos ven- 
didos, obteniendo el resultado exacto. 

La segunda opcion realiza la operation al 
reves que la primera. Esto es, se le da el por- 
centaje sobre las ventas y en base a este se 
obtiene de manera aproximada el stock final 
de mercandas. 

La tercera opcion es para cuando no haya 
stock de mercandas, o sea imposible conocer- 
lo, dependiendo el resultado de esto ultimo. 
Si hubiera existencias, el resultado no es de- 
masiado Liable, mientras que si realmente no 
las hay, entonces este se aproxima mas a la 
realidad. 

La siguiente opcion es SALDO DEL IVA. Si 
se ha contabilizado normalmente, realiza un 
informe de los movimientos de las cuentas que 
recogen el Impuesto sobre el Valor Anadido, 
que son: 

473. — IVA Soportado. 

474. — Hacienda deudora por IVA 
Soportado. 

478. — IVA Repercutido. 

479. — Hacienda acreedora por 
IVA Repercutido. 

Para realizar este proceso correctamente, 
hay primero que actualizar las cuentas, de ma¬ 
nera que las cuentas de tres cifras recojan to- 
do el saldo, y el resultado sea correcto. Una 
vez revisado el saldo de los dos cuentas de 
IVA, el programa dara el saldo de dicho im¬ 
puesto, y a cual de las cuentas de Hacienda 
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— Pendientes de Pago. 

— Pagados. 

— Pago de Vencimientos. 

— Actualizar fichero. 

— Ordenar Vencimientos. 


No obstante, su potencia no es nada del o!rc 
mundo. La capacidad de apuntes y cuentoses 
escasa, y se hacen necesarias las engorrosos 
maniobras de actualizar, borrar asienros y 
cambiar discos. En linea, se pueden disponer 
aproxirnadamente de 1.600 apuntes, con 501 
cuentas y 500 vencimientos simultaneamentl 
en un disco normal. Naturalmente, si se dis¬ 
pone de la segunda unidad de disco de 750, 
la capacidad en asientos se dispara a 9.000..., 
y la cosa cambia un poco. 

Los listados que efectua son correctos, fal- 
tandole al programa, quizas, un poco masde 


La primera opcion lista los vencimientos pen¬ 
dientes de pago desde la primera fecha que 
se le de, hasta la segunda. Permite elegir si se 
desea por pantalla o impresora. 

La segunda opcion, es identica a la anterior 
salvo que lista los pagos ya realizados y ven- 
cidos. 

La tercera opcion sirve para anotar el pa¬ 
go de los vencimientos. Esfa opcion, presenta 
una pantalla similar a la de entrada de asien¬ 
tos, y al darle el numero del vencimiento, se 
presenta en la pantalla. Si se esta conforme 
con esto, se le cambia la situacion en la co 
lumna de la derecha a P pagado. Reaiizar esto 
no significa nada a nivel contable. Si se ha pa¬ 
gado, habra que reaiizar un asiento en la con- 
tabilidad reflejandolo, y ademas recogerlo en 
el fichero de vencimientos para que los infor¬ 
mes que realice esta opcion sean correctos. 

Cada vez que se realicen bastantes pagos, 
y la capacidad del fichero sea pe- 
quena, se utilizara la opcion 


hay que cargarlo. Naturalmente, aparte de 
los motivos fiscales, es necesario para que el 
programa funcione correctamente, que todo 
apunte de IVA pase a traves de las subcuen- 
tas de estas dos cuentas. 

La opcion de VENCIMIENTOS, utiliza los 
apuntes en los que se marco dicha clave, pa¬ 
ra ayudar a localizarlos. Dispone de las si- 
guientes opciones: 


ACTUALIZAR FICHERO, que borrard del mis- 
mo todos los apuntes que esten pagados y ven- 
cidos simultaneamente, ganando asi espacio 
en disco. 

Para no variar, en este menu tambien hay 
una opcion que permite ordenar cronologica- 
mente los vencimientos, cuyo funcioriamiento 
es igual a los otros que se han visto. 

Como conclusiones, la primera seria decir 
que el programa es muy fdcil de manejar, bien 
presentado y estructurado. Su manejo no ofre- 
cera complicaciones a nadie. (A nadie que se- 
pa contabilidad, claro...) 
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valor 


Otro aspecfo 
muy pradico de 
este programa es 
la incorporation de 
on fichero de vencimien- 
tos, que permite tener con- 
Iralados todos los pagos con 
sus fechas de vencimiento corres- 
pondientes. 

La election de un programa de contabilidad 
depende mucho del tipo de gestion que se 
quiera llevar. La capacidad puede ser un ele- 
mento determinante, pero puede no serlo, y 
si serlo la complejidad del mismo. 0 ambas 
cosas a la vez. Este es un programa muy sen- 
cillo, medianamente potente, apio para llevar 
perfectamente contabilidades de tarnano pe- 
queno, de una manera rapida, sencilla y efec- 
tiva. Su manejo, ademas, es de los que no ofre- 
cen dudas. Algo nada facil de lograr. En re- 
sumen, un programa muy practico. 


Ficha tecnica 


informacion. Se echo en falta la posibilidad de 
realizar balances de situacion. Por lo demas, 
su funcionamiento es impecable. El libro de ins- 
Irucciones con el que viene acompanado es 
pequeno, pero mas que suficiente, explican- 
do las cosas con gran claridad. Incluso trae 
informacion adaratoria sobre contabilizacion 
del IVA y, ademas, trae incorporado ya una 
gran parte del plan de cuentas, cosa de agra- 
decer, dado que la tarea mas aburrida es dar 
de alia todo un plan de contabilidad, y en es¬ 
te programa esto queda reducido a dar de alta 
las cuentas de ultimo nivel. 


JKJ 

B 95219 


(FIRMA, NOM8RE Y DOM1C1LIO DEL L1BKADOR1 


TU. 12AR EL BSPACIO INTERIOR, RESRRVADO PARA TNSCRrPCION COniFtCADA 


Tipo: Gesti6n. 

Ord. Min.: PCW 8256. 
Ord. Aeon.: PCW 8512. 
Precio: 14.900 pts. + IVA 

| Distribuidor: IndetCOWip. 
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Una einta gratis 

por la compra 

de ittuneros atrasado§ 


yam 


Aprovecha la oferta 
y consigue tu coleccion 


Con la compra 
de siete minieros 
atrasados 
reeibiras gratis 
una einta de 
programas de 
YOUR 

COMPUTER (el 
mejor software 
Ingles), 
totalmente 
gratis. 






_ MICROSOFT-HARD, S. L _ 

APARTADO 24.399, 08080 BARCELONA. Telef.: (93) 348 04 07 (9 a 13 y de 16 a 20 horas) 

MANTENGA SU AMSTRAD COMO NUEVO CON UNA DE ESTAS PRACTICAS FUNDAS 


COD. 


ARTICULO 


MONITOR 


FC01 FUNDA ORDENADOR CPC 464 (verde; 
FC02 FUNDA ORDENADOR CPC 464 (color) 
FC31 FUNDA ORDENADOR CPC 472 (verde) 

FC32 FUNDA ORDENADOR CPC 472 (color)_ 

FC03 FUNDA ORDENADOR CPC 664 (verde) 
FC04 FUNDA ORDENADOR CPC 664 (color) 
FC05 FUNDA ORDENADOR CPC 6128 (verde) 
FC06 FUNDA ORDENADOR CPC 6128 (color) 
FC33 FUNDA UNIDAD DE DISCOS 
FC1 7 FUNDA ORDENADOR PCW 8256 


r.V.r 

2.262 ptas 
2.262 ptas 
2.262 ptas 
2.262 ptas 
2.262 ptas 
2.262 ptas 
2.262 ptas 
2.262 ptas 
412 ptas 
3.250 ptas 




COD. 


AMSTRAD PCW-8256/8512 

ARTICULO P.V.P. 


FC12 FUNDA IMPRESORA SEIKOSHA SP 800/1000 900 ptas. 

FC14 FUNDA IMPRESORA AMSTRAD DMP-1 1.205 ptas. 

FC1 5 FUNDA IMPRESORA RITEMAN F+/C+ 825 ptas. 

FC1 6 FUNDA IMPRESORA RITEMAN 10/120 785 ptas. 


AMSTRAD CPC-6128 

Si no estas interesado en 
alguno de estos articulos, 
escribenos e indicanos que 
accesorios necesitas para 
tu AMSTRAD. 



IMPRESORA RITEMAN 
F+/C+ 


IMPRESORA SEIKOSHA 
SP-1000/800 


NOTA: Disponemos de una gran variedad de fundas para otros micros e impresoras. 


CONDICIONES ESPECIALES PARA DISTRIBUIDORES 


— Realice su pedido por tel6fono o por carta. Indiquen siempre el codigo del articulo deseado y la cantidad que 
desean. 

- Todos los envios se realizan contra reembolso mAs 160 ptas. de gastos de envio. Todos estos precios llevan 
incluido el I.V.A. 


CUPON DE PEDIDO 


Recode o copie esle cupon y envielo hoy m smo a MICROSOFT-HARD, S. L. 


NOMBRE Y APLLUDOS 

nnMini in 

1 OCAI IDAD 


CODIGO POSTAL 


PROVINDIA 


. TELEFONO 


Codigo-Caniidad 

Codigo-Caniidad 

Codigo-Caniidad 

Codigo-Caniidad 
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AS I SE HACE 
UN PROGRAMA 
DE AJEDREZ 

Luis E. JUAN VIDALES 

En el mercado existen numerosos programas que juegan al ajedrez. Todos los 
aficionados o curiosos por el juego los han usado alguna que otra vez. Este articulo 
explica paso a paso como se hace un programa de ajedrez. Los metodos de busqueda, 

las funciones de evaluacion, todo. 


a realizacion de una ma 
quina capaz de ju- 
gar al ajedrez ha sido una meta que ha afrai- 
do la atencion de los hombres durante siglos. 

Ya en 1796, el baron Von Kempelen presen 
taba en Austria un sorprendente automata ca¬ 
paz de veneer a sus contrincantes humanos, 
entre los que se contaron Napoleon Bonaparte 
y Edgar Allan Poe. Muchos anos despues se 
comprobo que «EI Turco» (que as/ se llama- 
ba el automata) albergaba en su interior a uri 
experto jugador humano de pequeria estatu- 
ra, que era quien en realidad gobernaba los 
mecanismos. 

La primera maquina jugadora de ajedrez 
«sin trampa» fue construida hacia 1890 por 
nuestro Leonardo Torres Quevedo y todavia 
existe y funciona. Se trata de un ingenio elec- 
tromecanico capaz de dar mate de lorre y rey 
contra rey. 

Sin embargo, el autentico «padre» del mo 
demo ajedrez por ordenador es el matemati- 
co norteamericano Claude Elwood Shannon, 
quien con su articulo ((Programming a compu¬ 
ter to play chess», publicado en Scientific Ame¬ 
rican en febrero de 1950, establecid los prin 
cipios fundamentales que todavia constituyen 
la base de casi todos los programas de aje¬ 
drez para ordenador, entre efios las famosas 
«Estrategias A y B» que se veran mas 
adelante. 

El objetivo del presente articulo es exponer 
los ideas y elementos basicos necesarios para 
la implemeniacidn de un programa de ajedrez 
y nuestra secreta ilusion, que algunos de nues- 
tros lectores se sientan suficientemente anima- 
dos como para intentar llevarlos a la practica. 


A estos les auguramos interminables horas 
de experimentacion absorbente e instructiva. 

ELEMENTOS DEL JUEGO 

El primer obstaculo a superar cuando se pre- 
tende programar un ordenador para jugar al 
ajedrez es, obviamente, el de como «explicar 
le» en que consiste el juego. 

Dado que el ordenador es un ente capaz $o- 
lamente de almacenar y manipuiar numeros 
(a velocidad vertiginosa, desde luego), no solo 
es necesario convertir la realidad fisica de un 
fablero de 64 casillas y 32 piezas de 12 tipos 
diferentes en una estructura matematica racil- 
mente procesable por el ordenador, sino lam- 
bien trasladar sus complejas reglas a funcio¬ 
nes numericas y, todavia mas importante, re- 
ducir a ecuaciones todo el conocimiento tac- 
tico y estrategico que marca la diferencia en¬ 
tre un autentico jugador de ajedrez y alguien 
que solo sabe mover las piezas. 

Asi pues, los elementos que definen las ta- 
reas a realizar por todo programa de ajedrez 
son los siguientes: 

a) Representacion de posiciones. 

b) Generacion de movimientos. 

c) Evaluacion de posiciones. 

d) Esfrafegia de busqueda. 

En los siguientes aparfados estudiaremos la 
implementacion de los elementos enunciados, 
haciendo observarque, mientras los dos pri- 
meros estan ya plenamente conseguidos so 
bre un ordenador, no existe (todavia) un al- 
goritmo optimo para los dos ultimos, siendo 


precisamente la evaluacion de posiciones la 
que determina la potencia de juego del pro¬ 
grama y la estrategia de busqueda, su eficien- 
cia en terminos de economia de tiempo. 

Hemos exciuido el tratamiento de presenta- 
cion de datos, que puede ir desde el simple 
codigo algebraico hasta los graficos tridirnen- 
sionales, pasando por coordenadas a base de 
LED's, por ser un tema secundario e indepen 
diente del nucleo del programa. 


REPRESENTACION DE POSICIONES 

Aunque la representacion numerica mas in 
mediata de un tablero de 8x8 casillas seria 
una matriz de 8x8 elementos, enla practica, 
y debido a las consideraciones que haremos 
a continuacion, se prefiere utilizar un tablero 
de 10 X12, representado por una matriz uni 
dimensional de 120 elementos (verFigura I). 

En efecto, mediante la disposicion en 10 X12 
se puede establecer un «borde» en torno al ta¬ 
blero de 8 x 8 a base de casillas en las que se 
almacena un codigo especial, que permite la 
deteccion inmediata de cuando una pieza se 
«sale» del tablero. El utilizar 10x12 y no 
10x10 se debe al particular movimiento del 
caballo, que salta 2 casillas de una vez. 

(El hecho de no ser necesario un tablero de 
12xl2lo dejamos a la curiosidad del lector). 
Finalrnente, el empleo de una matriz unidimen¬ 
sional se debe a la estructura lineal de la me- 
moria del ordenador y a la circunstancia de 
que este no necesita, como nosotros, repre¬ 
sentor «visualmente» un tablero cuadra- 
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do. No obstante, en los diogramas que se in- 
cluyen en estos articulos se representa la car¬ 
te central de dicha niatriz en forma de 8x8 
para facilitar su comprension, quedando so 
breentendida su verdadera representacion en 
la memoria del ordenador. 


t 

bp. 

J L 

0 

Cuadro vaa'o 

0 

1 

Peon 

-1 

2 

Peon recien movido dos cuadros 

-2 

3 

Caballo 

-3 

4 

Alfil 

-4 

5 

Torre no movido 

-5 

6 

Torre movida 

-6 

7 

Doma 

-1 

8 

Rey no movido 

-8 

9 

Rey movido 

-9 

255 

Cuadro exterior al fablero 

255 


TABLA 1 


En cuanto a las piezas, existen numerosos 
sisfemas de representacion posibles, si bien no- 
sorros preferimos el de la Tabla 1 , va que sim- 
plifica la aplicacion de las regias del enroque 
y de la captura «al paso» de los peones. A 
la izquierda se representan los codigos de las 
piezas del programa y a la derecha, los de las 
piezas del contrincante. Observese que el co- 
digo de representacion de las piezas no equi- 
vale al valor de dicha pieza en la evaluation 
de material. 


GENERACION DE MOVIMIENTOS 

Las funciones generadoras de movimientos 
deberan ser capaces de calcular, para cada 
pieza, la lista de movimientos validos o licitos, 
es decir, aquellos de los posibles que no con- 
tradigan las regias del ajedrez. For ejemplo, 
supongamos al rey bianco enrocado en ia ca- 
sillo 27 de la Figura 1. Sus movimientos posi¬ 
bles seran a las casillas 16,17,18, 26, 28, 36, 
37 y 38. Ahcra bien. las casillas 16, 17 y 18 
contienen el codigo de «borde» y en las 26, 
3/ y 38 hay una torre y dos peones, respecti- 
vamente. Si el rey se ve atacado por un alfil 
negro en la casilla 36, sus unicos movimien¬ 
tos licitos seran 36 (capturando al alfil) o 28. 

En el mismo ejemplo, podria suceder que el 
alfil negro estuviera defendido por, digamos, 
un caballo negro. En este caso, al estudiar el 
programa la continuacion correspondiente al 
movimiento 27-36, hallaria que una de las res- 
puestas posibles de las negras seria capturar 
al rey bianco, por lo que, «a posteriori# 
en este caso, dicho movimiento tambien seria 
considerado como ilicito. 

La forma mas simple que pueden adoptar 
las funciones generadoras de movimientos es 
la de tablas de incremenfos relafivos a la ca- 


silla (ver Tabla 2) complementadas por una se- 
rie de condicionales y verificadores de !a lici- 
tud de los movimientos. Vease como la mayor 
complejidad de movimientos corresponde al 
peon y no al caballo, debido fundamentalmen- 
te a su modo de capturar (fanto normal como 
alpaso), diferente del de las dernas piezas; asi- 
mismo, la funcion generadora debera incluir 
la promocion del peon que llega a la octavo 
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TABLA 2A 


Condiciones 

1 

2 

4 

4 

5 

6 

0 

0 

0 

0 

1 1 

3 

4 

4 

5 

6 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 

0 
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0 

0 

0 

0 

0 

0 

0 

0 
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0 

0 

0 

0 . 

0 

7 

8 

0 

0 

0 

0 

0 

0 

0 

0 

0 
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TABLA 2B 


fila. En cuanto a las piezas llamadas «desli- 
zantes» (dama, torre y alfil), un flag adicio- 
nal indica al programa que puede coniinuar 
explorando una aeterminada direccion incre¬ 
mental mientras siga encontrando casillas vacias. 

En la Tabla 2b, las condiciones asociadas a 
los movimientos respectivos de la Tabla 2a son 
las siguienfes: 


0 = No hay condicion. 

1 = Si la casilla destino esta vacla. 

2 = Solo desde fila 3 (ver Figura I). 

3 ~ Solo desde fila 8, 

4 = Si en casilla destino hay una pieza con- 
traria. 

5 - Si en casilla origen ■ 1 hay un peon ccn- 
tario codigo 2. 

6 - Si en casilla origen +1 hay un peon con- 
frario codigo 2, 

7 - Regias enroque corto. 

8 = Regias enroque largo. 

No*ese que el enroque esta considerado como 
movimiento de rey. 


EVALUACION DE POSICIONES 

Un programa que desarrollara exclusive- 
mente los dos elementos anteriormente ex- 
puestos se limitaria a mover (muy comedo- 
mente, eso si) las piezas sin ningun tipo de plan 
estrategico, ni siquiera tactico, ignorandocom- 
pletamente el fin ultimo del ajedrez, que es el 
de dar mate al rey contrario. 

Esta regia fundamental, «dar mate al 
rey contrario#, tan facil de enunciar, es ex- 
traerdinariamente dificil de hacersela com- 
prender a un ordenador, hasta el puntodeaue 
sclo son posibles aproximaciones indirectos 
basadas en los dos principios siguientes: 

a) Una mejora progresiva de la posicion 
de las piezas propias respecto a las del con¬ 
trario acabara conduciendo al mate. 

b) El contrario siempre intentara mantener 
la posicion de sus piezas tan buena como le 
sea posible. 

E! desarrollo del primer principio requiere 
unas funciones de evaluacion de la posicion, 
y el del segundo, unas estrafegias de busquedo. 

La fuerza de juego de un programa de aje- 
drez viene determinada fundamentalmente 
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por la calidad de su funcion evaluadora de po 
siciones. Esta suele aaoptar la forma siguiente: 
F = kifi +M 2 + + k n fn 

donde f\,h ... f n son las funciones parciales 
que evaluan diversos factores de la posicion 
(material, movilidad, estructura de peones, 
etc.) y ki, k?... k n son los coeficientes de pon- 
deracion relativa de cada factor, que pueden 
variar segun la fase del juego en que se en- 
cuentre la partida ( apertura , medio juego o 
final). 

La mision de la funcion evaluadora es asig 
nar un valor numerico unico a cada posicion 
originada por el generador de movimientos, 
que representa la «bondad» de dicha posicion 
(tanto en valor absoluto como en signo), y en 
base al cual la estrategia de busqueda deci- 
dira el movimiento a realizar en cada turno 
de juego. Evidentemente, cuanto mayor sea 
el numero (n) de factores considerados, mas 
precisa sera la funcion F, pero mayor sera el 
tiempo de proceso requerido. 



A confinuacion se exponen las principales 
funciones parciales de evaluacion de la posi¬ 
cion, fi. 


MATERIAL 

Es la caracteristica mas importante del aje- 
drez y esta constituido por las piezas presen- 
tes en el tablero por parte de cada bando, ca¬ 
da una con su valor relativo. El valor asigna- 
do generalmente a los distintos tipos de pie¬ 
zas es: 

PEON = 1 TORRE = 5 

CABALLO=3 DAMA=9 

ALFIL=3 REY-200 

(en realidad, infinite) 
La funcion adopta simplemente la formula: 
fi=fr Valores piezas propias)— ( IS Valores 
piezas contrarias). 
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FIGURA 2 


Inicialmente, por tanto, fi =239—239 = 0. 

Se puede afirmar la valoracion de las pie¬ 
zas asignando, por ejemplo, un 3.5 a los alfi- 
les cuando esta la pareja del color en el table¬ 
ro o a los caballos en las posiciones cerradas. 

Finalmente, diremos que con esta unica fun¬ 
cion el programa comienza ya a comportar- 
se como un jugador, si bien su juego resulta 
un tanto primitivo. 


MOVILIDAD 

Ocupa el segundo lugar en importancia y 
consiste en el numero total de movimientos li- 
citos «a prioris que el programa puede reali¬ 
zar con sus piezas. Como ejemplo, observese 


que desde la posicion inicial de partida cada 
bando tiene una movilidad = 20 (2x8 movi¬ 
mientos Ifcitos del peori mas 2x2 decaballo). 
La funcion puede adoptar la forma siguiente: 


fz= 


(Mov. p. propias)—(Mov. p. contrarias) 

(Mov. p. propias) f (Mov. p. contrarias) 


Inicialmente, 


20-20 o 
20 ' 20 


DESARROLLO 

Se trata de un concepto facil de compren- 
der pero dificil de cuantificar. Grosso modo, 
las piezas estan desarrolladas cuando se ha- 
llan fuera de sus cuadros iniciales; no obstan¬ 
te, la buena pracfica del ajedrez aconseja de- 
sarrollar primero caballos y alfiles, enrocar a 
continuacion y, finalmente, desarrollar torres 
y dama. Asimismo, por regia general el en- 
roque es mas importante cuando la dama con- 
traria se encuentra todavia en el tablero, de- 
bido a $u peligrosa accion potencial sobre un 
rey ubicado en el centro. 

Son muchas las funciones de evaluacion po- 
sibles y aun mas las excepciones a las reglas 
enunciadas mas arriba. A tftulo de ejemplo, 
presentamos la funcion propuesta por David 
Levy: 

f 3 =D/3—U/4—C.E. 

siendo: 

D = N.° de caballos y alfiles propios fuera 
de sus cuadros iniciales (incluyendo los 
que ban sido capturados). 
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U=0 si la dama propia no se ha movido o 
ha sido ya capturada. 

= N.° de piezas propias no desarrolladas, 
en el resto de los casos. 

C = 2 si la dama contraria esta en el tablero 

= (I—P/4) en caso negativo, siendo P el 
n.° de torres, caba'las y alfiles contra- 
rios caplurados hasta ese momento. 

E = 0 si el programa ya ha enrocado. 

= 1/4 si el programa no ha enrocado, pe- 
ro podria hacerlo por cualquiera de los 
lados. 

= 1/3 si ya no es posible el enroque lar¬ 
go- _ 

= 2/3 si ya no es posible el enroque cor 
to. 

= 1 si se ha perdido el derecho a enrocar. 

A pesar de su aparente arbitrariedad, se 
puede comprobar mediante un analisis dete- 
nido que esta fa evalua el desarrollo de las 
piezas con una precision bastante aceptable. 

Incialmente, D = 0, U = 0, C=2, E=l/4. Por 
tanto, fa = 0.5 


DOMINIO DEL CENTRO 

El dominio del centra es uno de los princi¬ 
pals objetivos del desarrollo de piezas, da¬ 
do que desde las casillas centrales una pieza 
puede atacar mas cuadros que desde los hor¬ 
des y, por supuesto, mas que desde las esqui- 
nas. Para evaluar esta caracteristica, la fun- 
cion correspondiente posee una tabla de pun- 
fuacion asociada a cada casilla (ver figura 2 ), 
efectuando la operacion siguiente: 

Puntos asociados a casillas atacadas 
por piezas propias). 

Cabe la posibilidad de hacer mas agresivo 
el programa desplazando el «centro» de la ta¬ 
bla de punfuacion hacia las filas contrarias e 
incrementando el valor de las casillas del opo- 
nente, tal como se muestra en la figura 3, re- 
ferida en este caso a las blancas. 

(Noto: fd tiene en cuenta las casillas ata¬ 
cadas debido a que, en principio, toda casi¬ 
lla atacada es «ocupab!e». Una funcion al- 
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FIGURA 3 


ternativa mas simple se puede obtener suman- 
do directamente los puntos asociados a las ca- 
sillas ocupadas por piezas propias). 


ATAQUE AL REY 

El metodo mas simple de evaluar la fuerza 
de nuestro afaque sobre el rey contrario se ba - 
sa en la misma idea de la funcion anterior, con 
la diferencia de que, en este caso, la tabla de 
puntos asociados a cada casilla es dinamica 
y esta referida a la posicion del rey contrario. 
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FIGURA 4 


En la figura 4 se representa dicha tabla para 
las blancas, suponiendo que el rey negro es- 
tuviera en la casilla 96 fy. 

fs=(E Puntos asociados a casillas atacadas 
por piezas propias). 


SEGURIDAD DEL REY 

Un rey esta mejor defendido cuanio menor 
sea el valor de las piezas defensoras y mas 
proximas esten de aquel estas ultimas. Asimis- 
mo, una pieza defendida es aun mejor defen- 
sora del rey. Estas consideraciones pueden 


FIGURA 5 



materializarse de la forma siguiente: 

h~E, ^ (N; + l) 
siendo: 

Qi= Proximidad de la pieza defensora i al 
rey propio segun los balores de la ta¬ 
bla de «ataque al rey» (es decir, 8 pa¬ 
ra casillas inmediatas, 4 para la capa 
siguiente, etc.), aplicada al rey propio. 

V;= Valor material de la pieza defensora i. 

N; = N.° de piezas propias, induido e! rey, 
que defienden a su vez a la pieza de¬ 
fensora i. 


ESTRUCTURA DE PEONES 

■ i 
l 

La estructura de peones constituye el «esque- 
leto» de la posicion y suele ser decisive cuan- 
do se alcanza la fase final de la partida. Exis- 
ten tres tipos de peones que infiuyen negali- 
vamente en la estructura: 

a) Peones doblados, cuando existen 2 o 
mas del mismo color en una columna. (figura 
5, Pb 2 y Pb 3 ). 

b) Peon aislado, si no hay otros de su co¬ 
lor en las columnas adyacentes. (figura 5, 

Pa 7 ). 

<) Peon rezagado, cuando no existe nin- 
gun peon de su mismo color en las columnas 
adyacentes que este mas retrasado que el. (fi¬ 
gura 5, Pf 2 ). 

Por el contrario, hay un tipo de peon cuya 
influencia en la estructura es positiva, especial- 
mente de cara al final (hasta el punfo ae que 
puede resultar mas valioso que una pieza ma¬ 
yor, por su posibilidad de promocion alllegar 
a 8 ° fila): 

d) Peon pasado, aquel que no tiene con- 
trarios en su rnisma columna ni en las dos ad¬ 
yacentes. (figura 5, Pc 4 ). 
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La funcion que evalua la estruciura de peo- 
nes para las blancas puede ser del tipo de: 


f 7 = JL Ei G,-Nr-4 n a 

M+l 


siendo: 

Material total en el iablero, excluidos 
ambos reyes. 

Gi = Fila ocupada (de 2 a 7) por el peon 
pcsaao i de las blancas. 

Nr = N.° de peones blancos rezagados. 

N D = N.°de peones blancos doblados. 

N a = N.° de peones blancos aislados. 

En la figura 5, f? =—0.33 para las blancas 
y f 7 = —4 para las negras. 


ATAQUE Y DEFENSA DE PIEZAS 


Las funciones analizadas hasta este momen¬ 
ta realizan una evaluacion de las caracteristi- 
cas «estatica$» de una posicion. Sin embargo, 
es muy interesante que el programa dispon- 
ga de una funcion capaz de estimar de algu- 
na manera las cualidades tacticas de la posi¬ 
cion en terminos de posibilidad de ganancia 
de material o, incluso, de mate al rey contra- 
rio. Dicha funcion podria formularse en los ter¬ 
minos siguientes: 


fs = 2i 


V, = 




' v, 


donde: 

Vj=Valor material de la pieza contraria ata- 
cada i. 

Vh=Valores materiales de las piezas propias 
j aue atacan la pieza i. 

Vj= Valores materiales de la piezas contrarias 
h que defienden a su companera i. 


FINALES DE PARTIDA 

No se trata fanto de establecer una funcion 
especifica, como de detector cuando una par- 
tida ha entrado en dicha fase y obrar en con- 
secuencia, modificando sutilmente el compor- 
Samiento del programa. 

La tecnica de finales es la parte mas dificil 
de piasmar en un programa de ordenador de- 
biao a que las circunstancias mas aparente- 
mente negligibles pueden decidir el resuliado 
final de la partida. (Es sabido que, a igualdad 
de material, el hecho de que un rey este en 
una casilla o en la adyacente puede Invertir 
dicho resultado). No obstante, sobre tal dificul- 
tad, se pueden establecer algunos criterios uti¬ 
les en el tratamiento de esta tase de la partida: 

a. Los coeficientes de ponderacidn, k, de 
las distintas funciones se deberan acomodar 
a la nueva situacion. Por ejemplo, en esta fa¬ 
se adquieren mayor importancia el material 


y la esfructura de peones y menor, el daminio 
del cenlro y la seguridad del rey, entre otras. 

b. Los peones pasados, en particular, son 
de la maxima importancia, debiendo ser de- 
fendidos preferentemente por torres coloca- 
das detras y no debiendo ser obstaculizados 
por piezas propias. El programa deberia bo- 
nificar y penalizar respectivamente tales de- 
fensas y obstdculos. 

<. En un final de solo peones, el rey con 
trario debe ser forzado, en lo posible, a salir 
del «cuadrado del peon» pasado propio. 
El concepto de «cuadrado del peon» no 
es exdusivo del ajedrez por computador y con- 
siste en el cuadrado definido por el vertice (ca 


FIGURA 6 



sillaj ocupado por el peon y la 8. a fila, hacia el 
lado del rey contrario. Si dicho rey esta fuera del 
cuadrado cuando ie toca mover al peon, no 
podra evitar que este llegue a 8.° fila. (En la 
figura 6, las blancas ganan con 1 .TxT+ RxT}. 

d. Cuando el rey contrario ha quedaao 
compeltamente solo, el programa debe dispo- 
ner de un buen algoritmo para arrinconarlo. 
Se puede hacer simplemente en la misma ta- 
bla de puntuacion empleada en la funcion 
«Dominio del centro» (aplicada al rey 
contrario), combinada con un algoritmo que 
procure aproximar ambos reyes. Esta claro 
que el programa siempre elgira el movimien 
to que minimice la puntuacion del rey contra¬ 
rio, con lo cual este sera empujado progresi- 
vamente hacia una esquina. Por otra parte, 
la conveniencia de que el rey propio este pro¬ 
ximo resulta obvia. 


ESTRATEGIAS DE BUSQUEDA 

Segun la teoria de juegos, un juego es un 
conjunto de regias univocas que dererminan 
en todo momento el comportamiento de los ju- 
gadores. La principal caracteristica de los jue¬ 
gos, y del ajedrez entre ellos, es que las per 
didas o ganancias de cada jugador no depen 
den solo de sus propias acciones u omisiones, 



AMSTRAD ESPECIAL 47 



































































sino tambien del comportamiento del contra- 
rio. Cada jugador decide $u siguiente movi¬ 
miento a la vista de la sifuacion existente cuan- 
do le toca el turno, pero se puede afirmar que 
las jugadores tienen previsto de antemano que 
lo que harian en cualquiera de (as circunstan- 
cias posibles. El «cafalogo» de las decisiones 
para todas las situaciones posibles es, preci- 
samente, lo que se denomina «estrategia». 

Un juego de las caracteristicas del ajedrez 
permite la aplicacion de todo tipo de sistemas 
clasicos de exploracion del arbol de varian- 
tes y busqueda en grafos. En el presente arti- 
culo nos limitaremos a exponer los mas tfpi- 
cos y representatives, sin pretender hacer una 
enumeracion exhaustive. 


EXPLORACION DEL ARBOL 

El drbol de variantes se forma al conside- 
rar, a parfir de una position dadc llamada 
raiz, las secuencias formadas por todos los mo 
vimientos licitos que puede efectuar el progra- 
ma, todas las respuestas del contrincante a ca¬ 
da uno de ellos, todos los nuevos movimien- 
tos que puede realizar el programa como con- 
trarreplica a los del contrincante, etc., hasta 
llegar al nivel determinado por la profundidad 
de busqueda. Para tener una idea del tama- 
no del arbol, diremos que en una posicion de 
ajedrez hay un promedia de 37 movimintos li- 
ci'os a disposicion del jugador al que le toca 
mover; par lo tanto, un arbol de profundidad 
4 tendra una media de 1.900.000 variantes, 
equivalentes a otras fanfas posiciones fermi- 
nales a evaluar mediante la correspondiente 
funcion F. Dado que con profundidad 4 solo 
se analizan 2 jugadas completes (2movimien- 
tos por parte de cada bando), se comprendera 
la irnportancia de dotar al programa de una 
estralegia de busqueda lo mas eficiente posible. 


METODO MINIMAX 

En la figura 7 se representa la explosion 
combinatoria de un arbol de variantes de pro¬ 
fundidad 4, relativamente «poco frondoson. La 
posicion rafz es PO, con el turno de juego en 
poder del programa. Una de las posiciones 
terminales, por ejernplo la PI 232, se alcanza 
ria despues de la siguiente secuencia de mo 
vimientos: 

Programa Contrincante 

1. Ml M12 

2. M123 Ml 232 

En las posiciones terminales el turno de jue 
go vuelve a estar en poder del programa, in 
dicandose a la derecha la puntuacion obteni 
da por cada una de ellas al aplicar la funcion 
evaluadora F. 

El metodo minimax se basa en el segundo 
de los principles enunciados en el apartado 5 


de estos arficulos; el programa «reflexionana» 
de la manera siguiente: 

a. La posicion terminal mas aeseable se- 
ria la PI 223, que posee la puntuacion mas alta 
de todas (12 puntos). 

b. Sin embargo, mi contrincante mueve 2 
veces antes de que lleguemos a cualquiera de 
las posiciones terminales y juega (por lo me¬ 
mos) tan bien como yo, por lo cual no debo 
esperar que elija precisamente los movimien- 
tos que mas me favorecen. 

c. Asi pues, debo conformarme y elegir el 
movimiento que conduzca a la mejor posicion 
terminal posible suponiendo que, siempre que 
mueve el, elige el movimiento mas perjudicial 
para mf. 

En una busqueda a profundidad 4, el pro¬ 
grama debei a encontrar el maxima de los mi- 
nimos de los maximos de los minimos, razon 
por la que el metodo recibe el nombre de «mi 
nimax». En el arbol de la figura 7, la mejor 
posicion terminal posible es la PI231 con 5 
puntos y, por tanto, el movimiento a efectuar 
es el Ml. La variante principal es la secuen¬ 
cia de movimientos: Ml, Ml2, Ml23, Ml231. 

Para llegar a tal conclusion, el programa 
evalua todas y cada una de las posiciones ter¬ 
minales y luego «remonta» las puntuaciones 
hasta la posicion raiz PO, de acuerdo con el 
siguiente criteria: 


A) Si en una posicion el turno de juego es- 
ta en poder del contrincante, se le asigna ia 
puntuacion minima de las posiciones deriva- 
das. 

B) Si en una position el turno de juego es- 
ta en poder del programa, se le asigna la pun¬ 
tuacion maxima de las posiciones derivadas. 

En la figura 7 se indican entre parentesis las 
puntuaciones remontadas de cada posicion. 
La posicion terminal «minimax» es, obviamen- 
te, aqueila cuya puntuacion «se transmite» has¬ 
ta la posicion raiz. 


ALGORITMO ALFA-BETA 

Es facil imaginar que la aplicacion directa 
del exhaustivo metodo minimax a una posicion 
real de mifad de partida puede resultar cos- 
tosisima en lo que a tiempo de proceso se re- 
fiere. Para acelerar el computo y mejorarsu 
eficiencia existen diversos algoritmos que <po- 
dan» el arbol de variantes, reduciendo dras- 
ticamente el numero de evaluaciones necesa- 
rias en la exploracion del arbol. Uno de los 
mas conocidos y eficientes es e! Ilamado «ol- 
goritmo alfa-beta», que debe su nombre a la 
ufilizacion de dos variables: 

ALFA, que representa la mejor puntuacion 


FIGURA 7 
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que puede conseguir el contrincante. Su va¬ 
lor iniciai es +oo (recuerdese que, para el con 
trario, es la pero punfuacion posihle, ya que 
razona at reves que el programaj. 

BETA, que represenfa la mejor punfuacion 
aue puede lograr el programa. Su valor ini 
cial es — oo. 

Alfa es el elemento «minimizante» y beta, el 
#maximizante». El algoritmo va, aiternativa- 

FIGURA 8 



mente. poniendose en el lugar del contrincante 
y en el del programa y seleccionando la me¬ 
jor punfuacion posible para ambos bandos, re- 
chazando sin evaluar ramas derivadas de una 
posicion cuando la informacion acumulada 
hasta ese momento convierte en redundante 
su examen. 

En la figura 8 se representa una implemen- 
tacion delalgoritmo particularizado para una 
profundidad de 4 movimientos, por lo cuai se 
emplean dos parejas de variables alfa-beta: 
(u(3y (A, Sj.Los sucesivos subindices de las pa- 
siciones terrninales estan representados por i, 
j, k, n, Asimismo, I, J, K, N, simbolizan la ulti¬ 
ma rama a examiner desde la posicion corres- 
pondiente. El algoritmo entrega las salidas si- 
guientes: 

B = punfuacion remontada de la posicion 
raiz, PO. 

W = indice del movimiento a efectuar des¬ 
de PO. 

Aplicando el algoritmo alfa-beta al arboi de 
la figura 7, se llega exactamente a la misma 
conclusion que con el metodo minimax, pero 
evaluando solamente 16 posiciones termina- 
les de las 32 que confiene el arboi (las marca- 
das con *). 

Aunque este ahorro del 50 por ! 00 no es 
en absoluto despreciable, es insignificante 
comparaao con la eficiencia que el algoritmo 
alfa-beta corisigue cuando se aplica sobre dr- 
boles complejos (que son los que se dan en la 


prdctica ). Llamando «r» al numero de ramas 
que salen de una posicion y «p» a la profundidad 
de busqueda, el numero de posiciones termi 
nales a partir de una posicion raiz sera r p . 

Se demuestra matemdticamente que el al 
goritmo alfa-beta, frabajando en condiciones 
optimas (es decir, examinando en primer lu¬ 
gar los movimientos mejores), solo necesila 
evaluar 2 r h posiciones terrninales. Esto sig 
nifica que, en un arboi de r = 37 y p = 4, en el 
que hay 1.874.161 posiciones terrninales, el 
algoritmo solo examinaria 2.738, lo cual su- 
pone un ahorro de nada menos que un 99,85 
por 100. 

En la practice se procure, mediante meto- 
dos empiricos, que el algoritmo trabaje en las 
mejores condiciones posibles, siendo tipico al- 
canzar eficiencias superiores al 99,3 por 100. 


ESTRATEGIA SHANNON TIPO A 

Llamada tambien «mefodc de la fuer- 
za bruta», es la estrategia de busqueda mas 
primitiva y se basa en la aplicacion rigurosa 
del metodo minimax con o sin algoritmo alfa- 
beta. El arboi se forma hasta una profundidad 
determinada, induyendo, por supuesto, todas 
las variantes y la evaluacion de posiciones se 
realiza siempre en dicha profundidad. sin im- 
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portar si las posiciones terminales son «tran- 
quilasn o «turbulenlas». El principal de- 
fecto de esta estrategia es su «miopfa», de- 
bida a la imposibilidad de ver mas alia de la 
profundidad predeterminada, la cual hace que 
en ocasiones el programa elija el movimienfo 
aparentemente mas prometedor y con ello se 
situe al borde del abismo, especialmente cuan- 
do la posicion terminal estd en medio de un 
intercambio de piezas. No obstante, esta es¬ 
trategia es la mas difundida en programas de 
ajedrez para ordenador y sus resultados son 
bastante aceptables, siempre que la profun¬ 
didad de busqueda sea suficiente. 



ALGORITMO DE INTERCAMBIO 

Ideado para paliar los inconvenientes de la 
estrategia tipo A, se basa en el mantenimien- 
to, para cada casilla de las 64 que componen 
el tablero, de dos listas actualizadas (una por 
bandoj en las que figuran las piezas que ata- 
can dicha casilla, ordenadas de menor a ma¬ 


yor valor material, o en orden de captura si 
este viniera obligado por la ubicacion de las 
piezas. 

El algoritmo computa el valor de ocupar una 
determinada casilla o de capturar en una ca¬ 
silla ocupada por el contrincante, para el ban- 
do al que le toca mover, El valor de intercam¬ 
bio de una casilla es la ganancia material que 
puede esperar el bando al que le toca mover 


si Neva hasta el final la secuencia de captures 
o cambios que es posible en dicha casilla. Por 
medio de este valor, el programa puede de- 
cidir si merece o no la pena realizar una de¬ 
terminada captura o, induso, si la ocupacion 
de una cierta casilla es segura o no. 

La aplicacron del algoritmo es simple.- supo- 
niendo que cierta casilla esta ocupada por la 
pieza contraria de valor Co, que es definido 
por Ci, Cj y C 3 , y que esta bajo el ataquede 
las piezas propias Pi, P 2 y P 3 , si el programa 
inicia la captura con Pi, obtiene una ganacia 
de material Gi =Ca. Si el contrario responde 
capfurando a su vez, G 2 = Cq—P i, Una nue- 
va captura llevari'a a Go=Co—P 1 + C 1 , aue se 
convertiria en Gi = Co— Pi +Ci— Pj si el con¬ 
trincante vuelve a responder, etc. De esta ma- 
nera se puede ver cual es el mejor momenta 
para detener la serie de capturas 0 si, por el 
contrario, es preferible no llegar a iniciarlo. 

Las dos limitaciones del algoritmo son debi- 
das a funciones extras que puede estar desem- 
penando alguna de las piezas involucradasen 
el intercambio y que el algoritmo ignora: pie¬ 
zas davadas y piezas con doble funcion de 
apoyo (:sobrecargadas). 


ESTRATEGIA SHANNON TIPO B 

A la vista de los inconvenientes de la estra¬ 
tegia tipo A, Shannon propuso una estrategia 
tipo B, que se aproxima mucho mas al com- 
portamiento de un iugador humano. En este 
caso, la profundidad de busqueda no estd to- 
talmente predeterminada, sino que el progra¬ 
ma trafa de todas las posiciones terminales, 
a partir de una profundidad minima, seandel 
tipo «estatico» (es dear, que ninauno de los 
movimientos posibles a partir de el I as impliaue 
toma de materiel), prolongando la busqueda 
en aquellas ramas del arbol donde sea preci- 
so para lograrlo. 

Por ejemplo, el programa puede construir 
el arbol de variantes fiasta profundidad 2 y 
luego seguir buscando hasta profundidades 
mayores solo en las variantes en que todos los 
movimientos sean capturas, jaques 0 replicas 
a jaques, deteniendose cuando estas alcanzan 
posiciones terminales estaticas. 
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La base de esta estrategia reside en la mu 
cho mayor fiabilidad de las funciones evalua- 
doras en las posiciones estdticas y su mayor 
inconveniente es el peligro de una prolonga¬ 
tion excesiva de la busqueda en posiciones 
muy «turbulentas». A este respecto, la estra¬ 
tegia tipo B fambien puede ser complementa- 
da con el algoritmo de intercambio para limi- 
tar la busqueda. 


BIBLIOTECA DE APERTURAS 

Todo programa de ajedrez que se precie de- 
be poseer una biblioteca de apertures lo mas 
extensa posible. Las ventajas que ello repor¬ 
ta son numerosas: 

a. Se reduce drasticamenfe el tiempo de 
calculo para los primeros movimienios. 

b. Se aumentan las probabilidades de lle- 
gar a la fase de medio juego con una posicion 
casi optima a nivel teorico. 

(. Se da variedad al juego frente a un con 
trincante humane, ya que, por su naturaleza 
matemdtica, las funciones evaluadoras y es- 
trategicas dorian siempre los mismos resulta- 
dos a partir de unos mismos datos de parti- 
da. 

La manera de organizar una biblioteca de 
aperturas es relativamente simple; puede 
adoptar la forma de table indexada, donde 
a cada movimiento le corresponden 2 bytes: 
casilla origen y casilla destino (o casilla origen 
$ increment). Mientras el oponente siga una 
determinada variants, el programa se limita- 
ra a extraer su movimiento de la biblioteca, 
Cuando el contrincante se aparte de la linea 
de juego almacenada, conmutara automati- 
camente al rnetodo general de calculo. En los 
casos en que los movimientos posibles seen 
multiples para el programa (por ejemplo, si le 
toca iniciar la parrida), la seleccion se hara me¬ 
diants un procedimiento aleatoric. 

Se deberian codificar como minirno las aper¬ 
turas mas importantes, incluyendo todas las 
variantes que la moderna teoria ajedrecistica 
sanciona como superiores, hasta una profun- 
didad de 4 a 10 jugadas (dohles movimien¬ 
tos), segun los casos. El volumen de memoria 
ocupcdo por una buena biblioteca de aper¬ 
turas puede llegar a iguaiar la propia exten¬ 
sion del programa de calculo, pero los bene- 
ficios obtenidos lo justifican. No hay que olvi- 
dar que la teoria de aperturas constituye una 
parte fundamental de los conocimientos de to- 
do buen jugador de ajedrez. 


ESTRUCTURA DEL PROGRAMA 

Un programa de ajedrez para ordenador 
adopta basicamente ia estructura del organi- 
grama de la figura 9. Tras una primera fase 
en la que los movimientos son «de libro» por 
ambas partes, el programa comienza a gene- 



rar posiciones terminals a profundidad pre- 
fijada, desde la posicion raiz alcanzada en ese 
instante. La funcion evaluadora F suministra 
la puntuacion de ia posicion terminal exami 
nada a la estrategia de busaueda, la cual va 
«modificando su opinion* sobre el movimien¬ 
to a adoptar a medida aue considera las su- 
cesivas posiciones terminales. Es la propia es¬ 
trategia, dotada normalmente de aigun algo 
ritmo de «poda», la que gobierna el salio a 
la siguiente posicion terminal a evaluar (sim- 
bolizada por «n» en el organigrame). 

Finalizada la busqueda y presentado el mo 
vimiento efectuado por elprograma, caben 
dos posibilidades: 

a. Que el programa se limite a esperar el 
movimiento del contrincante (version 4a). 

b) Que el programa aproveche el tiempo 
de reflexion del contrincante para profundi- 
zar su analisis con vistas al movimiento siguien¬ 
te (version 4b). 

Esta ultima posibilidad es sumamente inte- 
resante, ya que manteniendo el mismo tiem¬ 
po medio de respuesta del programa, la pro- 
rundidad efectiva de analisis puede ser supe¬ 
rior. E! programa, una vez generado su mo¬ 
vimiento, supone que la respuesta del contrin¬ 
cante es la que corresponde, iogicamente, a 
la variante principal y toma como nueva po¬ 
sicion raiz, la resultante despues de la jugada 
completa. (En el ejemplo de la figura 7, una 
vez decidido M1 por conducir a la posicion ter¬ 


minal PI231, supone que la respuesta sera' 

M12 y toma como nueva posicion raiz la M12). 

A partir de ella, y mientras no sea interrumpi- 
do por la entrada del movimiento del contrin 
cante, lanza una nueva busqueda anticipada, 
que puede llegar a ser incluso de profundidad 
superior si el tiempo lo permite. Si la respuesta 
real del contrincante no es la prevista, el pro¬ 
grama desecha simplemente los calculos efec- 
tuados y se enfrenta a la posicion verdadera. 

En la practice, si el programa esta bien di- 
senado, la respuesta del contrincante sera la 
prevista en un porcentaje mayoritario de las 
jugadas. Llamando «m» a este porcentaje, 
podemos escribir: 

T f =T p + mT c 

donde: 

T r =tiempo medio efectivo de reflexion dis- 
ponible para el programa. 

T p = tiempo medio de respuesta del progra¬ 
ma. 

T c = tiempo medio de respuesta del contrin¬ 
cante. 

(7 P y T c son los tiempos que «tarda» en emitir 
su movimiento el programa y su contrincan¬ 
te, respectivamente, tras el movimiento del 
otro). 

Dado que T, + T P , es obvio que con un tiem¬ 
po de respuesta T p podemos conseguir una 
profundidad de busqueda mayor que la que 
aparentemente seria posible, pues en realidad 
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disponemos de un tiempo T r . (Esta claro que 
en la version 4a, T r = T p j. 

Es precisamente el tiempo de reflexion T r el 
que determine en ultima instancia la fuerza de 
iuego del programa, una vez optimizadas las 
funciones evaluadoras y las estrategias de bus- 
queda y, de hecho, es el parametro sobre el 
que actua la seleceion de nivel de juego en los 
programas. 
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FIGURA 9 

ESTRUCTURA DEL PROGRAMA 



CONCLUSION 


La realizacion de un programa de ajedrez, 
como esperabamos haya quedado patente a 
lo largo de estos artfculos, es una tarea a la 
vez titanica y atrayente. Es titanica porque el 
numero de rutinas diversas a desarrollar al- 
gunas de elias bastante complejas, es muy ele- 
vado. Y es atrayente porque la «<riatura» 
Simula algunos de los mas interesantes proce- 
sos de la mente humana (muchos de los con¬ 
cepts involucrados en su creacion forman 
parte de los sistemas aplicados en inteligen- 
cia artificial, como el metodo mini max y el al- 
goritmo alfa-beta) y su complejidad supone un 
reto para el programador. 

Si alguno de nuestros lectores se siente con 
fuerzas suficientes para afrontar la realizacion 
de un programa de ajedrez, le haremos las su 
gerencias siguientes: 

a. El programa debe ser lo mas modular 
posible. Dada su extrema complejidad, es pre- 
ciso facilitar las correcciones y los cambios. 

b. A pesar de su lentitud, resulta de gran 
ayuda el realizar una version previa, aunque 
sea parcial (una especie de maqueta), en Basic. 

C. No conviene afrontar directamenfe una 
funcion de evaluacion que incluya todas las 


parciales descrifas. El programa funcionara 
aceptablemente con solo incluir material, mo- 
vilidad y ataque al rey, por ejempio. 

d. El valor relativo de los coeficientes It de 
ponderacion es extremadamente importante y 
debera ser determinado experimentalmente; 
como orientacion, lo suele valer de 8 a 12 veces 
mas que cualquiera de los demos coeficientes, 

e. Aunque el programa resulte un tanto es- 
tupido, no es mala idea empezar con una es- 
trategia tipo A a profundidad 2, con minimax 
y sin algoritmo de intercambio. 

f. Al prinripio, habra que conformarse con 
que el programa juegue rematadamente mal 
los finales (de hecho, es casi milagroso que en 
algun momentc llegue a jugarlos verdadera- 
mente bien). 

Finalmenfe, para los que deseen profundi- 
zar sobre el tema, recomendamos excelentes 
libros: 

—«Manual de ajedrez por compu- 
tadora», de David Levy. 

Editorial Mitre. Barcelona, 1986. 

«Ajedrez y computadoras», de L. 

Pachman y V. I. Kuhnmund. 

Ediciones Martinez Roca. (Coleccion ESCA- 
QUESj. Barcelona, 1982, 
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EL MUNDO 
DE LOS JUEGOS 



El mundo del software de juegos para Amstrad es mas rico y complejo 
cada dia que pasa. La cantldaa de titulos, si los pusiesemos todos 
juntos, alcanzaria una altitud realmente sorprendente. Ademas, la 
gente que compra juegos padece una «obsesion» de las mas logicas del 
mundo: les gustaria conocerlos a fondo, recorrerlos hasta el no/ y, si 
son demasiado difidles, encontrar una pequena ayuda en alguna 
parte que les permita enterarse de la totalidad del juego en un tiempo 

razonable. 

Mas de un lector se estara imaginando a donde queremos llegar: a los 
programas cargadores que permiten a los poseedores de una copia 
legal de un juego hacer maravillas en el. 

En efecto, de eso se trata. Os presentamos 10 cargadores completos 
para que disfruteis a tope de vuestros programas favoritos. 
QulsiSramos dar las gracias a nuestra revista hermana. Micromania, 
por proporcionarnos todo tipo de asistencia y ayuda en un campo de 
la informatica en el que son, sin discusion, los primeros expertos. 



















GYROSCOPE 

Estamos frente a uno de los jue- 
gos mas diffciles y originales que 
hemos visto nunca: el arte de con- 
ducir un mecanismo giroscopico, 
alias peanza, por los intriricados 
paisajes de un laberinto tridimen¬ 
sional, frfa y desierto como el solo, 
no es facil de dominar, y justifica 
plenamente la inclusion de un car- 
gador complete, cuyos secretos no 
vamos a descubrir por aquello de 
no aguar la fiesta a los fieles segui 
dores de la Orden del Joystick. Vi¬ 
das infinitas, enemigos Inocuos y 
mucho mas os esperan detras de 
unas pocas Ifneas de programa. 


10 REtt CARGADOR PARA GYROSCOPE 
20 MEMORY &39AE: MODE 1 
30 FOR F &50C0 TO &5032:READ A: POK 
E F, A: NEXT 

40 INPUT "VIDAS INFINITAS <S/N)'\AS 
OR Ai*"n" THEN POKE &502 


'JUEGO MAS FACIL <S/N)”;A$ 
OR At-"n" THEN POKE &502 


■TIEMPO INFINITO (S/N)";At 
OR At-"n" THEN POKE &502 


: IF A* "N" 

2, S35 
50 INPUT 
: IF At="N" 

7 , &3A 
60 INPUT 
:IF At-"N" 

C, A3 A 

70 CLS:LOCATE 12,12:PRINT"INSERTA E 
L ORIGINAL":LOAD"!" 

80 POKE &39E2,&C3:POKE &39E3,S9:POK 

E &39E4.&50:CALL &5000 

100 DATA 33,255,171,17,64,0,195 

110 DATA 175,57,62,63,50,43,2 

120 DATA 62,76,50,44,2,33,33 

130 DATA 80,17,0,7,1,18,0 

140 DATA 237,176,243,241,201,62,0 

150 DATA 50,43,83,62,201,50,132 

160 DATA 63,62,201,50.130,65,195,16 

, 79 
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MODE 


asastes 


load 


.memory a5BFi; 


&5D66 
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yiugarconel sin la ayuda de mi 

tro programa cargador puede re 
suitor harto frustante. 

Poreso, seguroqueagradece 

el turbo infinito y los cohet P 
pulsores tambien intmitos. 
Ahora a teclear, apneta los 


nos y. 


;VIVA LA TRAVESURA! 
AYUDEMOS A JACK 
THE NIPPER 


Porque, jquien no ha tenido ga- 
nas de tirar de la cola a un perro, 
arrojar objetos a la gente o poner- 
se a tirar petardos por la calle? 
Pues, seguramente toda la gente 
«adulta», 

Y como las frustracianes son ma- 
las de guardar, con Jack the Nip¬ 
per tendremos la oportunidad de 
vivir todas las cosas que siempre 
quisimos hacer, pero que nunca nos 
dejaron. 

Pero como esto cansa, si no que 
se lo digan a los «babyes» cuando 
caen en la cama, aqui tenemos una 
radon de fuertes medicinas. Lea, 
lea... 
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fto,*® 1 =MVU 9 TO to 08 t: KBAD - 

«.!«■ K 

l«S. .."iEND jkvAKIABTK <S 

KswrnK»ptKAio«A i» , . rHEM P0 

ki M-. If **-"*> 0R 

6SS042,O i wvINITU <S/m";Ai: 

Ksm"lTUKlJ0^1*^ POKE S-304A 

*M "S” OR At- 3 

1 : ;F H»“S” OR At ^ 

40 1SRUT" 1 LASER 111 f] 1B |^ pQKii SS060 
IfM-'S" OR At® s r«b» 


t iSVUT* 

,1: IF At 
let. o 

loo call 

110 DATA 
120 DATA 
130 DATA 
100 DATA 
ISO DATA 
160 DATA 
170 DATA 
'80 DATA 
190 DATA 
200 DATA 
210 DATA 
220 DATA 
230 DATA 
240 DATA 
2b0 DATA 
260 DATA 
270 DATA 
280 DATA 
290 DATA 
300 DATA 
310 DATA 
320 DAI A 
330 DATA 
340 DATA 
3b0 DATA 
360 DATA 


iakkadoua 

;"S" OR At S 


srs-wfe^-"* 

-S'S : Ss;^r 

M.lOS.Sto.M .9 

S&iSK&K 

IV. o, 191 Lo', 8 33°ii04, 133,24 
1V6,24 k m 33. 103. 140 
3 ' 20!5 ^ , « W 1 33,243 

24 ’ 9 ^ 73 19L.'33,102.134 

Ff:' » « i«' 33 ' 132 

13 9 24^:20;.V3.1'H ; 33 

a 4 4 ' if 21 ° 205 3 7 ^ wf 33 
133.205 ^ai’Xb O.IM.l 




10 REM Jack the Nipper 
20 REM 

30 REM por A, C. L. 

40 REM 

50 LOAD"!NIPPER”:POKE &A056,0:POKE 
&A059 &A5 

60 FOR 1=&A500 TO &A50A:READ A:POKE 
I,A:NEXT 
70 CALL &AOOO 

60 DATA &3E, O, &32, &FF, &39, &32, 8rOO, & 
3A,&C3, SOI,&10 



STAINLES STEEL 

Con este curioso nombre, 
igual a la frase que insertada en 
la tapa posterior de muchos re- 
lojes, se nos presento hace tiem- 
po un cenudo muchacho. Stain 
tenia pinto de duro, bueno, de 
punk duro. Mas tarde descubri que no solo tenia la pinto de duro. Stain 
era un punk como los de antes, no como esos que se conforman con lle- 
var extrana pelambrera y beber a todas horas en la calle. A Stain se le 
podia mirar fijo, se enfadaba. A Stain era mejor dejarle solo. 

Por eso cuando los androides invadieron la Tierra se molesto mucho. 
Pero no fue debido a que fueran a destruir la raza, 
que va, se molesto porque 
no podia circular a toda ve- 
locidad por las autopistas que 
era lo que a el le gustaba. 

Mai, muy mal la van a pasar 
los androides. 


10 MEMORY *3FPF:LOAD"!",*4000 
20 MODE 2:INPUT"Vidas inflnitaa (S/ 
N) : ",at:at UPPERS(at):IF at^"S" T 
HEN POKE 0,1 ELSE IF at "N" THEM PO 
KE 0,0 ELSE 20 
30 POKE 1,0 

40 INPUT”Fase inicial <0/1/2/31 : " 

, a: IF a>3 THEN 40 ELSE IF a<0 THEN 
40 

50 fa=a 

60 POKE *4084,*40:POKE *4085,0:sum- 
04 FOR i~*40 TO 112: READ at:a$="*”»a 
$:POKE i,VALiat):suro-sura+PEEK<i>: NE 
XT 

70 MODE 1:POKE *69,fa:CALL *4000 
80 DATA 3A, 0, 0, B7,26, A, AF, 32, F3,6,3 
2 , F4,6,32, F5,6, 3A, 1, 0, B7,28, 4, AF, 32 
, 79,4,3E, CD, 32, 7D, 14,21,68. 0,22, 7E, 
14,C3, 16, 1,3E, fa, 32, E8 ,. BF, C9, C3, 16, 
1 
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ses y ie 
?ris^o P nesdelo si r,vo i o- 

rei Ved, ved, lo firm* magic- 


PORSIEWPREBOWBJACK 

Bueno, 'a V 6 L. s tro superraton. 
apreciamos a n ayuda pa- 

Asi que, un diain ^ (qs te rnbles 
ra poder acab ores . Nosotros, 
alienigenas in ^ eXC eso de tra- 

lestaban. irnp etus volvio a 

Con renovados imp j ac v. 

pelear nues ,[° te de energia y fell- 
Su cara, radian a ^ p ir amides 


20 UKA« l Ik« CB J < > 1 4 . h l/ D 

0 ELSE »' »*- 

"oTocate 

r 3 o 

. bin". 6000 nv; POKE SIMM- 

r.E^HE- ,4f HE rroKk 0 ,iOD F ,0 : POKE * 

WBo!o:VOKH al 9EB.O-POKE * 

^otrOKB^^A.O 

90 CALL 60°0 
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RASPUTIN 

Con estos pokes de escudos y es- 
padas infinitas y energia inagota- 
ble podrds veneer al malvado Ras¬ 
putin y apoderarte de la Joya de 
ios Siete Planetas. Esta joya es la 


fuente de su inmenso poder y, pa¬ 
ra evitar que alguien se la quite, la 
ha protegido mediante Ios ocho 
conjuros mas fuertes que conoce en 
el mundo atemporal e ilocalizable 


de Ios Siete Planetas. Suponemos 
que te seran muy utiles y lograras 
tu objetivo, de no ser asi la furia de 
sus monstruos dard cuenta de ti. 


10 MODE 1 : BORDER 2: INK 0,0: INK 1.26 
:INK 2,2:INK 3.6 

20 WINDOW #1, 14.26, 5,5: WINDOW #2,14 
,26,7,7 

30 MEMORY StiFFF: LOAD"roscode" , SA400 
40 FRINT" INSERTA BL ORIGINA 

L" 

50 LOAD”!rasputini”:a e &1681 

60 POKE a,&C3:POKE a+1.0:P0KE a+2,4 

A4 

70 INPUP'espadas y escudos inagotob 
les" ; a$: IF UPPERS<a$>«•'N” THEN POKE 
&A462, 8i39 

80 INPUT"energia infInita”ia$:IF UP 
PERSCaS)*="N M THEN POKE SA43A, &C 
90 CLS 

100 CALL &1600 









































DISCO: 


CINTA: 


10 DPEN0UT M a M 

20 MEMORY 1000:KODE 1:BORDER 0:INK 
0,0:INK 1,25:INK 2,10:INK 3,15:PRIN 
T"INTRODUCE LA CINTA ORIGINAL" 

30 ON ERROR GOTO 50 
40 LOAD"f",0 

50 LOAD"POKE 42138,201:CALL 4210 
0 

60 LOCATE 1,20: INPUT'*VIDAS INF1NITA 
S (s/n)" ( a$:IF a$-"s" THEN POKE &85 
BF,0:POKE &85C0,0 

70 LOCATE 1,20:INPUT"FLECMAS INFINI 
TAS <s/n>", a$:IF a$- M s" THEN POKE a 
9029,0 

80 CALL 41162 


10 OPENOUT"a" 

20 MEMORY 999:M0DE 1:EORDER 0:INK 0 
,0:INK 1,25:INK 2,10:INK 3,15 
30 ON ERROR GOTO 50 

50 LOAD"glaurung.bin":POKE 42138,20 
1 

60 LOCATE 1,20:INPUT"VIDAS INFINITA 
S <s/n) ,, ,a*: IF a$ "s" THEN POKE &85 
BF, 0: POKE *8500, 0 

70 LOCATE 1,20:INPUT"FLECHAS INFINI 
TAS (s/n) M ,a$:IF n$-"s" THEN POKE & 
9029,0 

80 CALL 41162 


LAS TRES LUCES 
DE GLAURUNG 


liempo atras, los jovenes se ga- 
naban la gloria matando a perfidos 
magos, malvados Caballeros, o res- 
catando a princesas prisioneras de 
perfidos senores. 


Nuestro rustico protagonista se quiso ganar unos dineros y un nombre 
a costa de salvar al mago del senor de la region. 

Y para cumplir adecuadamente con esta mision, no hay nada como 
tomarsela con calma. 

Nosotros recomendariamos la siguiente receta. 

Nueve partes de vidas infinitas y una parte de flechas inagotables. Mas 
o menos ash 



Batman debe reunirlas y montar el 

C °| C o aue esta claro es que su ene- 
escondido el coche en sa- 

l a , J !l e nmdepeligrosylramp»,Po 

lo que Batman tendra que lucna 

° Pero ahora que puedes ayudar 
| e , no dudamos que lograra cumplir 

su mision. 


"BATMAN” 
0: POME & 


batman , 

Aaul teneis un cargador para el 

rob ark) el Baticar, su espec.aiisimo 

C °Arkquin lo escondio en su cueva, 
_ ,-lacniezado en siete partes. 


POKE I.A-HXTMF^h-c 
HEN PRIST ”«ror i f 

THEN 40 BLSE IF «•“ 

I*P0r-T.n.r elBATICA. 
" WPER*<«*> : 

nl <>”N” THEN 50 ELSE IF 

POKE 1.1 

?rifo'.i',53,EC.BC. 0 C3:i 

B 3B.E8.21.5E,A0.E5.33, 

i'zBSxiW 

E,99,32,EC 

I no DATA 1C.DD,21.B... 

DD, 77 i 1 > Tir 5, 77,2.3A, 1. ^ 
I AF.DD.21 lAl DD,77,0 
I 34.D .77 

1 -7-7 ?.3E,7F,32,B3,31,C_ 





























CARATULAS PARA SUS DISCOS 

ora que guarde sus mejores programas de los, hasta ahora, cuatro especiales 
aparecidos, aqui tiene 4 caratulas para sus discos. 
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Avenger 

Despues de recorrer el Camino del Tigre y lograr hacerte un 
honorable ninja, deberds veneer al Gran Guardian, principal 
tirano y opresor del pueblo, para robarle todos los tesoros que 
ha conseguido almacenar en su fortaleza, a costa del hambre 

de todos sus subditos. 

Pero cuidado, la fortaleza de tan terrible senor esta guardada 
por temibles guerreros, ademas de odiosas y magicas bestias. 




on Avenger se 
nos presento 

la teorica segunda parte de 
ii he Way of the Tiger. Y 
decimos la teorica, porque 
no entendemos como los 
hombres de Gremlin, 
definen asf el Avenger en la 
caratula del juego. 

Nos extrana el hecho de 
que juegos tan diferentes en 
planteamiento se quieran 
relacionar. 

Por una parte tenemos 
que The Way of the Tiger, 
un excelente juego, esta 
basado en una buena 
representation de combates 
de artes marciales que 
podremos llevar a cabo con 
nuestro ninja. 

Por otro lado, el Avenger, 
que tambien es un buen 
juego, tiene el planteamiento 
mas o rnenos clasico del 
juego de «recoleccion» de 
objetos. 

La verdad, es que 
nosotros pensamos que la 
unica relacion que une a 
estos dos juegos es el 
nombre del ninja. Avenger. 

Despues de estas 
consideraciones, pasemos a 
jugar. 

En el inicio del juego, nos 
encontramos en los jardines 
del palacio, que, como todo 
buen jardi'n oriental, posee 


un tupido cesped ademas de 
un ti'pico arroyo cruzado por 
dos puentes. 

A partir de aqui, desde los 
jardines, deberemos ir 
buscando las Haves que nos 


abran las puertas de las 
otras dependencies del 
castillo. 

jY que hay en las 
dependencies del castillo? 
Pues, evidentemente, los 
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tesoros que tendremos que 
recoger para, como si de un 
Luis Candelas oriental se 
tratara, repartir entre los 
pobres. 

Mas, como a nadie le 
gusta que le roben el 
dinero, aunque a su vez el 
lo haya robado, ha 
colocado el amo y sefior de 
palacio, todo tipo de fieros 
guerreros dispuestos a 
incordiar. Si a esto le 
anadimos algunas cobras y 
una especie de extrahos 
insectos, que parecen 
manquitas azules, tendremos 
un buen monton de motivos 
para no aburrirnos en tan 
encomiable mision. 

Para ver el estado de 
salud en que se encuentra 
Avenger, disponemos en 
pantalla de unos curiosos 
indicadores. 

Son dos esferas rodeadas 
de puntitos luminosos, 16 
exactamente, que en la 
superior van desapareciendo 
con mayor o menor rapidez 
segun la dureza del 
combate. Si el combate 
fuera muy duro, 
desapareceri'an todos y en 
la esfera inferior 
perderiamos uno. Cuando 
en la esfera inferior solo 
queden dos o tres puntos, 


sera cuestion de ir 
planteandose la necesidad 
de pulsar la tecla 
perteneciente al numero dos 
de! teclado alfanumerico, si 
hacemos esto, nuestra 
energia se recargara y 
podremos seguir nuestra 
mision; si no, nuestras 




correrias estan proximas a 
su fin. 

Pero esta peticion de 
energia vital a los cielos, 
solo la podremos realizar en 
dos ocasiones. Si infringimos 
esto, nos saldrd en pantalla 


el mensaje de que los dioses 
se han enfurecido por 
nuestras ilamadas y 
caeremos entre agonicos 
estertores muertos al suelo. 
Luego vendra el eterno 
sufrimiento en el infierno. 

Ademas de los indicadore 
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vitales, tenemos 
tambien otros que 
nos indican las 
Haves que 
Hevamos, los 
tesoros que 
tenemos, los 
shuriken que nos 
quedan, y los 
objetos recogidos. 

Una vez que 
sabemos como 
controiar nuestra 
situation, pasemos 
a la aventura. 

Para no perder 
tiempo, 
deberemos ir 
hacia la parte 
inferior izquierda 
del jardfn. Allf 
cogeremos la 
Have y el tesoro 
que veremos, solo 
hay que tocarlos, 
y a toda 
velocidad, cosa 
nada difi'cil 
teniendo en 
cuenta que 
Avenger mas que 
correr vuela, nos 
dirigiremos hacia 
la puerta de la 
dependencia que 
se halla en la 
zona mas alta del 
ardin, 

aabriremos, 
teniendo la Have 
solo hay que 
tocar la puerta y 
despues de entrar 
recogeremos la 
Have que hay en 
la dependencia. 
Esta Have nos 
consigue 

automaticamente 
otras cinco en el 
marcador. 

^Parece 
facil? Pues, no lo 
es tanto. 

Mientras vamos 
recorriendo el 




jardfn, deberemos 
enfrentarnos a 
guardianes con nunchakus, 
karatecas, extrahos seres, 
bichos, etc. 

Y, aunque algunos son 
mas diffciles de matar que 
otros, deberemos acabar 
con ellos a la maxima 
velocidad posible para que 
no nos resten mucha energfa 
vital. 

Un sistema rapsdo de 
hacer esto, es dispararles los 
shuriken con los que 
contamos que son 10. 
Cuando se nos gasten, 
habra que ir dando patadas 
hasta que encontremos una 
caja que al tocarla nos 
concede 10 shuriken mas. 

Pero para no gastar ni 
energfa vital ni shuriken, 
recomendarfamos tambien el 
evitar enfrentamientos 
innecesarios. 

Otra cosa que dificulta 
nuestro movimiento, es una 
especie de cuchillos que 
emergen del suelo de las 
habifaciones, hay que 
procurar esquivarlos para 
no sufrir retrasos. 

Desde la sala anterior 


deberemos dirigirnos a la 
que esta inmediatamente 
debajo en la pantalla, allf 
recogeremos un tesoro, 
despues abriremos una 
puerta y, girando a la 
izquierda, seguiremos por 
un corredor hasta el final. 
Allf abriremos una puerta y 
comenzaremos a reconocer 
las salas. Veremos una sala 
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pequena custodiada por un 
guerrero, nos le quitaremos 
de enmedio y recogeremos 
la Have que hay allf. Esto 
nos conseguira tres Haves 
mas. 

Despues, una vez que 
hayamos salido de nuevo al 
corredor, iremos hasta 
donde se cruza a la derecha 
con otro pasilio, pasamos a 
la primera sala de la 
derecha, batallamos con una 
«mariquita» y atravesamos 
una puerta, giramos a la 
izquierda y seguimos un 
corredor hasta que se cruza 
con otro, giramos a la 
izquierda, entramos por otro 
corredor —jvaya llo, eh !—, 
lo seguimos hasta el final y 





entramos en una sala de 
suelo de madera, cruzamos 
una puerta y nos peleamos 
bravamente con un 
guerrero, lo derrotamos y, 
joh, maravilla!, vemos un 
objeto en el suelo, le 
recogemos con tremulas 
manos y un mensaje nos 



dice que es un anillo que 
nos hara inmunes, eso si, 
solo por un memento. Locos 
de alegrfa, cruzamos la 
puerta que nos lieva a otra 
sala donde una necia 
mariquita nos ataca, gracias 
a nuestro anillo la vencemos 
sin despeinarnos y 
recogemos la preciada Have 
que esta en el suelo. 

Despues.,., bueno, la 
verdad es que no nos 
gustarfa poneros las cosas 
excesivamente faciles ni 
tampoco querriamos 
cansaros, por lo que 
pensamos que os dejaremos 
a vosotros la continuacion. 

Solo os diremos que 
tendreis que bajar por una 
tramp'lla, la vereis en una 
sala de suelo de madera, y 
daros unas vueltas 
reconociendo la parte baja 



del palacio en donde 
tendreis que seguir 
cogiendo Haves y 
tesoros. 

Bien, llego la hora 
de las conclusiones y, 
la verdad sea dicha, 
estas son positives. 

Sin que la trama sea 
nada espectacular es 
entretenida, 
consiguiendo el 
laberinto de 
corredores y 
habitaciones 
mantenernos 
abstrafdos en la 
busqueda de Haves y 
tesoros. 

Los enemigos son 
bastante faciles de 
eliminar, pero 
cuidado, no hay que 
olvidar que algunos 
quitan bastante 
energia. 

Memos dejado para 
el final lo realmente 
destacable de este 
juego. Avenger, el 
protagonista, se mueve 
a velocidad de 
vertigo. Si, de verdad, 
se mueve como alma 
que lleva el diablo. 
Despues de dirigir un 
rato a Avenger, se 
contagia su velocidad 
y vamos circulando 
como las «motOS». 

Poco mas que decir, 
si no es que nos ha 
parecido muy 
entretenido el Avenger 
de Gremlins Graphics, 
que esta distribuido 
por Erbe y que, sin 
duda alguna, sera un 
juego que nos haga 
pasar buenos ratos en 
el ordenador. 





<t> 






AMSTRAD ESPEflA* 




















































FORTH TE INVITA A JUGAR 


Seguramente, bastantes de nuestros lectores, ya estan urt 
poco mas convencidos de que el ordertador que tenemas 
instalado ert casa (no almacenado) es algo mas que un «juguete »> 
destinado a ser utilizado para cargar en su memoria un buen 
programa de juegos y hacernos disfrutar de lo Undo con este 
simulacro de aventuras que ocurre en la pantalla. 
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personas se encuenfran algunas (cada vez 
mas, por ciertoj que han comprobado por sf 
mismos que el lenguaje Basic no es el unico uti- 
lizable para comunicarnos con nuestro queri- 
do Amstrad, sino que existe una gran va- 
riedad de formas y maneras de hacerlo. Es¬ 
kimos en lo cierto, £verdad? 

Este es el motivo que nos ha movido a con 
finuar adentrandonos en el mundo de los len- 
guajes de programacion ya que, ademas, nos 
parece que estamos ante una aplicacion de 
nuestro ordenador casero que se sale de la cla- 
sica codification de un programa en el lengua¬ 
je tipico que casi todos ellos llevan incorpora- 
do: Basic. 

El resultado de nuestros sondeos nos indico 
que, sin miedo a equivocarnos, podiamos in- 
tentar ofrecer la posibilidad de poder traba- 
jar con uno de ellos que, en principio por su 
forma de trabajo y por la propia concepcion 
del lenguaje, nos resulta atractivo «a tope». 
Y aqui es donde nos «aliamo$» con el Forth. 

Imaginamos que no habra olvidado toda 
via el concepto de «stack» o «Notaci6n 
Polaca lnvertida», por ejemplo, que les 
ofrecimos en el anterior numero especial de 
esta revista. Vamos a estar utilizandolos casi 
continuamente, asi que si todavia no tiene una 
idea dara de que es cada una de estas cosas, 
para que sirven y como se utilizan, le roga- 
mos que eche un vistazo a todo lo que ya he- 
mos publicado sobre ellas. 

Como no podemos estamos parados, le pro- 
ponemos que esta vez avancemos un poco 
mas en el tema, pero ahora que ya tenemos 
una cierta base teorica sobre el lenguaje y co- 
nocemos alguna de sus instrucciones o «pa- 
labras» ya definidas, lo haremos de una for¬ 
ma mucho mas practica, viendo que todas 
ellas pueden utilizarse para realizar «co$as» 
que sirvan para algo, pues su mision es bas- 
tante mas amplia que repetir una cierta frase 
doce veces, por ejemplo. ;0 no? 

jManos a la obra! Lo primero sera proyec- 
tar detenidamente «que» es lo que queremos 
hacer, £de acuerdo? 

Nuestro objetivo va a ser muy sencillo. In- 
tentaremos conseguir un programa para que 
el ordenador juegue con nosotros. No se tra- 
tara de «algo» dificil y complicado, sino de 
un mero entretenimiento que nos agudiza el 
ingenio y repetira una vez mas el enfrenta- 
miento amistoso entre el «hombre» y la 
«maquina». jSuerte! 

Partimos de que encima de la mesa de jue- 
go hay 20 monedas, o cualquier otro numero 
que nosotros elijamos. El primer jugador reti- 
rara de ella y a su criterio 1,2,364 dejando 
el resto sobre la mesa. 

El siguiente hard la misma operacion con las 


que hayan quedado disponibles y el turno pa- 
sard, de nuevo, al jugador que inicid la parti- 
da. 

^Hasta cuando durara? La solution a 
esta pregunta es bien sencilla: si no hay mo¬ 
nedas que retirar, se acabo lo que se daba. 
0 mas daramente diremos que el jugador que 
recoja la ultima moneda habra ganado la par- 
iida dejando a su oponente a la altura del be- 
tun. (■Sugerimos dark la revancha para que 
despues no baya quejas ni disculpas). 

Pero nuestro contrincante sera duro de pe- 
lar ya que vamos a enfrenfarnos con nuestro 
Amstrad y damos fe que posee una rapidez 
de reflejos digna de envidia. Asi que, jcuida- 
do! 

£$e atreve a realizarlo completa- 
mente en lenguaje Forth? Nosostros si, 
de modo que le invitamos a acompariarnos en 
la empresa. jEntiende daramente «que» pre- 
tendemos hacer? Seguro que si. 

Ahora nuestro problema sera como hacer¬ 
lo. La solucion buscada podria conseguirse de 
la siguiente forma: 

El programa tendra que explicar primero en 
que consists el juego ya que aunque nosotros, 
sus autores, sabemos como funciona, un po- 
sible competidor seguro que no tiene ni idea 
de como empezar. 

A continuation nos presentara en la panta- 
lla la oportunidad de elegir quien comenzara 
a coger las monedas. Si no estamos dispues- 
tos a dar el primer paso y le contestamos que 
no, seguro que el Amstrad esta presto a em¬ 
pezar y realizard la primera jugada. 

jYa sabemos quien comienza?, pues a pen- 
sar y calibrar para ver si logramos que no nos 
venza: entramos en la fase de «juego» propia- 
mente dicho. 

Supongamos que la competition se ha de- 
sarrollado sin ninguna incidencia ajena a las 
normas del juego y que la parfida ya tiene ga- 
nador. ^Que hacer ahora? El ordenador 
informard del resultado y vuelta a empezar. 

Siguiendo este proceso no encontrard nigu- 

(COMIENZO) 


INfORMACION 


t 


SALIDA 



JUEGO 



FIN 




( FIN «,) FIGU8AI 


na dificultad si desea plasmarlo graficamente 
en un organigrarna. Si no es asi, observe la 
Figura I que le aclarara sus dudas. 

Todos sabemos o, por lo menos, debiamos, 
que el lenguaje Forth enriquece su vocabula- 
rio basico anadiendole las «palabras» que 
nosotros mismos vamos definiendo basadas en 
las ya existentes. ^Que por que le deci- 
mos esto? Vaya pensando en crear alguna 
nueva que cumpla con cada una de las fun- 
ciones que hemos numerado anteriormente. 
Las llamaremos rtlNFORMACIONw, «SA- 
LIDA», «JUGAR» y «FIN » por simiiitud 
con cada uno de los procesos indicados en el 
organigrarna. 

Si le seguimos al pie de la letra traducien- 
dolo a «palabras» Forth conseguiremos de- 
finir la primera de las que esta compuesto el 
programa. Prepare su interprets Forth y jade- 
Iante! Tedee: 


PROGRAMA I 

: MONEDAS INFORMACION SALIDA JUEGO 
FIN ; _ 


y a continuation pulse la teda RETURN. 

jQue sorpresal En lugar de encontrarnos 
con la definicion de una nueva palabra, a la 
que hemos querido dar el nombre de «MO- 
NEDAS», resulta que hemos obtenido un 
mensaje de error: 

INFORMACION-Palabra no permitida 

Claro, jcomo va a permitirnos el «inter- 
prete» utilizar una «palabra» INFORMA¬ 
CION) que todavia no esta definida y que, por 
tanto, no esta disponible en el «diccionario»! 
Y podemos hacer extensivo esto a las demas: 
ninguna de ellas lo esta, asi que nuestro si¬ 
guiente paso sera decidir el modo de resolver 
cada uno de los graficos de proceso (rectan- 
gulos) del organigrarna que han dado lugar 
a estas «palabras». No abandone el lista- 
do del Programa I ya que mas tarde tendra 
que volver a utilizarlo. 

jQue es lo que tenemos pensado que haga 
la palabra «INFORMACION»? Tiene una 
mision realmente sencilla: contar al posible ju¬ 
gador las normas por las que se regird la par- 
tida. En Basic seria muy sencillo fabricarnos 
una rutina que a base de instrucciones PRINT 
nos explique el juego. en Forth? No se 
preocupe, tambien es muy simple. Si no se lo 
cree, eche un vistazo al Programa II. 


PROGRAMA II 

: INFORMACION 6 CLG i SPACES .* WtQS 
A JUGAR CON NUESTRO ORDENADOR. D1SP0 
NEMOS DE 28 MONEDAS Y CADA* CR 15 
SPACES JUGADOR IRA C0G1END0 1, 2, 

3 0 4 A SU ELECCION." CR CR 15 SPACES 
.* GANAM EL QUE CONSIGA LLEVARSE LA 
ULTIMA MONEDA." CR ; 
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No les menhamos, jverdad? No emplea nin- 
guna «palabra» fuera de ias ya existentes en 
el repertorio basico del interprets que esfamos 
utilizando, asi que dispongase a definir la pa 
labra «INFORMACION» a base de todas 
las que ya estan. En esfa ocasian no encon- 
trarn ningun obstaculo que se lo impida. 

^Novedades? Aparentemente ninguna. 
Siguiendo el listaao vemos que primero «me- 
te» un cero en el «stack» y luego borra la pan- 
talla de graficos con la palabra «CLG» y la 
tinta que contenga la posicion mas alta del 
stack: en este caso un cero. 

A continuacion y empleando ." (equivalents 
al PRINT para fextosj, visualize las lineas del 
mensaje. La palabra encargada de saltar li- 
nea es CR y SPACES tomard el valor que se 
encuentre en ese momenta en el tope del stack 
e imprimira tantos espacios como le indique 
dicho valor. ^Quiere ver los resultados 
producidos por INFORMACION? Te- 
clee entonces, simplemente: 

INFORMACION 

y al instante podremos comprobar si lo que 
aparece en la pantalla es lo que pensabamos 
tras analizar la definicion de la palabra. ^C6* 
mo queda el stack tras ejecutarla? 
Veamos despacito este punto. 

Primero introducimos en el un cero que des¬ 
pues extraemos en CLG. Despues metemos un 
6 que sacamos con SPACES, imprimimos un 
texto y saltamos de linea (estas dos palabras 
no manipulan el stack). A continuacion pone- 
mos un 15 para imprimir una serie de espa¬ 
cios en bianco, con lo que la piia vuelve a que- 
dar vada. 

Si seguimos analizando la palabra INFOR¬ 
MACION veremos que al final el stack queda 
vado ya que en el se introducen tantos valo- 
res como despues se sacan. Compruebelo te- 
cleando y le aparecera un mensaje de 
error que le indica esta circunstancia. jPode- 
mos dar como valida esta definicion de pala¬ 
bra? En confianza, creemos que si. 

Coniinuemos. «SALIDA» tendra que cum- 
plir dos funciones: preguntarnos si queremos 
ser los primeros en jugar o no y guardar en 
el stack un indicativo de uno u otro jugador. 
Hemos decidido, por decreto, que despues de 
ejecutarse esta palabra el elemento superior 
de la pila contenga un 1 si somos nosotros los 
que comenzamos el juego y un 0 en el caso 
que sea el ordenador. Su diagrama de flujo 
se corresponded con el de la Figura II. £ln- 
tenta codificarla en Forth? Ande, vava 
al Programa III y vea como lo hemos hecno 
nosotros. 

Empleamos una nueva «palabra» del reper¬ 
torio basico: «KEY», que mete en el tope del 


PROGRAMA III 

: SALIDA CR 25 SPACES .* SALES 7U PR1 
HERO? (S/N)* CR KEY DUP 83 = SWAP 11 
5 = OR IF 1 ELSE * THEN j 


stack el codigo Ascii del caracier que se co- 
rresponda con la tecla que puisemos. 

Luego duplicamos este valor ya que son dos 
las comparaciones que vamos a realizar 
(DUP). Veamos si es iguai a 83 (caracter5) por 
medio de: 

83 = 

que deja en el stack un valor de «verdadero» 
o «falso» segun haya ido la comparacion a la 
vez que extrae del mismo los dos valores que 
hemos comparado. 

Situacion actual del stack tras la valoracion 
de la condicion: valor de la teda en la zona 
baja y justo encima el resultado booleano de 
la comparacion. Luego si queremos compro¬ 
bar la posibilidad de que la tecla pulsada sea 
la «s» tendremos que intercambiar estos dos 
valores superiores para volver a colocar de 
nuevo ei codigo de la tecla pulsada en el ele¬ 
mento superior. Po eso es por lo que emplea- 
mos la palabra SWAP y 

115 = 

ya que 115 es el codigo Ascii de la letra «s». 

Esta nueva comparacion dejara otro valor 
booleano en el tope de la pila. Cuando al me- 
nos uno de ellos sea «verdadero», lo que 
implica que habremos pulsado la «S» o la 
«S», el resultado obtenido por la operacion 
logica OR sera tambien verdadero si el IF que 
le sigue lo evaluara, eliminara los dos boolea- 
nos de la pila y colocara en su lugar un 1 tal 
como queriamos. En caso contrario (pulsamos 
otra letra distinfa) el valor almacenado en el 
stack sera un 0. 

Resultado de la ejecucion de la palabra 
«$ALIDA»: Analiza la tecla pulsada, cuan¬ 
do sea «S» o «S» mete un 1 en el tope de la 
pila y un 0 en caso de no ser ninguna de las 
dos. En este momenta solo tendremos un va¬ 
lor almacenado en el stack, que depende de 
nuestra eleccion y que sera el indicativo que 
utilizaran otras rutinas para saber quien ha sa- 
lido. Compruebelo tecieando: 

INFORMACION SALIDA 

Bueno, ya tenemos resueltas dos de las ca- 

jas que forman ei primitive organigrama de 
la Figura I. Continuemos con las que nos que¬ 
dan. La siguiente la hemos bautizado con el 
nornbre «JUEGO». Las funciones que tene¬ 
mos previstas para ei son las siguientes: 

— Establecer el numero de monedas con las 
que vamos a comenzar el juego (20 en nues- 
tro caso). 

— Repetir por tumo la jugada mientras que- 
den monedas encima de la mesa. 

— Eliminar el numero de monedas almace¬ 
nado cuando sea cero. 

Y nada mas, es asi de sencillo. Su codifica 
cion sera la del Programa IV en el que tras in¬ 
troduce en el stack un nuevo 20 (valor inicial 
de la cantidad de monedas) repite una llama- 
da a la palabra «TURNO», que ya definire- 
mos, hasta que desaparezean todas. 

jOjoi, el interprete tampoco nos aceptard 
esta nueva palabra hasta que no definamos 


«TURNO», que se empiea repetidas veces 
en el bucle. El porque ya esta explicado ame- 
riormente. 

Ei paso siguiente sera desarrollar la selec- 
cion de! turno de jugada para ver como dis- 


PROGRAMA IV 

: JUEGO 26 DUP BEGIN 8 ) WHILE CR 
TURN O OUP REPEAT DROP ; 

tinguir a quien le toca coger las monedas y las 
acciones a realizar en cada caso. Su organi¬ 
grama es el reflejado en la Figura III. 



Toma como partida del andlisis el valor que 
la palabra «SALIDA» ha dejado en el stack 
segiin la tecla pulsada (0 si sale el ordenador 
y 1 si comienza el otro jugador) y podiamos 
descomponerlo de la siguiente forma: 

— Analizar el valor que dentro del stack re- 
presenta el indicativo del jugador. 

— Si se trata del ordenador, invocamos a 
la palabra que ejecutara todo el proceso ne- 
cesario para que eliga su jugada y actue en 
consecuencia. 

— En caso contrario el que elije es el juga¬ 
dor. 

— A continuacion calculara las monedas 
que quedan en la mesa. 

— Por ultimo, cambia el indicativo del ju¬ 
gador actual por el del proximo (cambia el tur¬ 
no). 

^Pasamos a codificarlos? El progra¬ 
ma V es la respuesta. 

Al ver ei listado pueden surgirnos varias pre- 
guntas. $A que viene el «OVER» existente na- 


PROGRAMA V 

: TURNO OVER 8= IF ORDENADOR ELSE 
JUGADOR THEN BUEDM SWAP 8= IF 1 ELSE 
8 THEN SWP ; 

da mas comenzar? Intente ver como llega el 
stack al principio de la ejecucion de esta «pa- 
labra». En el tope contiene el numero de mo¬ 
nedas que quedan y en el elemento inmedia- 
to inferior el indicativo de cada jugador. 

Si queremos analizar quien tiene en este mo¬ 
menta el turno, es evidente que, copiando el 
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elemento que esta debajo del superior en la 
pila en el nuevo tope de la misma, podremos 
hacer todas las comprobaciones necesarias ya 
que, de esta manera, tendremos disponible el 
numero que representa a cada juyador. 

Al final de esta palabra «TURNO» cam- 
biamos la posicion del stack que contiene el 
distintivo del jugador por el de su contrario pa¬ 
ra que vayan realizando cada uno su jugada 
alternativamente, 

^Como queda la pila despues de 
esta rutina? En el elemento superior hemos 
dejado la cantidad de monedas aue restart pa 
ra que en la siguiente vuelta del bucle se com- 
pruebe si hemos llegado al fin o no. En el que 
esta inmediatamente debajo guardamos el co- 
digo del siguiente jugador, £de acuerdo? 

En esta «palabra» utilizamos otras que to- 
davia no tenemos definidas. jRecuerda que 
ocurrira si la tedeamos asi, directamente? Se- 
guro que todavia sf. 

La primera es «ORDENADOR» que se en- 
cargara de realizar la jugada del Amstrad 
de la siguiente manera: 

— Si el numero de monedas aue restan es 
mayor que 4 elegird un numero aleatorio com- 
prendido entre 0 y 4 que sera las que retire 
de la mesa. Vaya pensandoen una nueva «pa- 
labra» que lo haga. 

— Si es menor que 5, el ordenador restara 
todas las que queden y ganara. 

— En ambos casos nos informara de lo que 
ha hecho. En Forth el Programa que realize 
todas estas acciones seria algo semejante al 
VI que resulta ser muy senciiiito y que lo uni- 
co que hace es anadir al stack un nuevo ele¬ 
mento que contiene las monedas elegidas para 
retirar. 

Pero ahora habra que definir la «palabra» 
que consiga entregarnos en el stack un numero 

PROGRAMA VI 

: ORDEmOOR DUP 4 ) IF ALEATORIO ELSE 
DUP THEN / ELI JO * DUP . CR i 

aleatorio comprendido entre 1 y 4. Para ello, 
aht esta el Programa VII. 

iQue hate? Nada extrano. Caicuia un 
numero aleatorio comprendido entre 0 y 


PROGRAMA VII 

: ALEATORIO RND 8192 / 1 * i 


32767, lo divide entre 8192 y le suma 1. ^Le 
extrana el 8192? INoseasuste, hombre! 
Divida 32767 entre 4 y obtendra algo pareci 
do. Lo hacemos de esta forma ya que aunque 
realmente lo suyo sera calcular: 

RND 4 * 32737 / 

de esta forma podria produdrsenos un 
«overflow» en uno de los elementos del 
stack y darnos el consabido mensaje de stack 
lleno. 

Otra de las nuevas palabras, «JUGA- 
DOR», sera la que nos indicara que es nues- 
tro turno. Para ello: 


— Preguntard el numero de monedas que 
hemos quitado del total. 

— Analizara si el valor tecleado esta com¬ 
prendido entre los margenes permitidos. 

— Nos devolvera en el elemento superior 
de la pila la cantidad elegida. 

Podemos suponer que esto implica dos pro- 
cesos diferentes, uno de «PREGUNTA» y 
otro de «COMPROBACION», asf que si lo 
codificamos quedara como el Programa VIII. 

PROGRAMA VIII 

: JUGADOR PREGUNTA CGNPROBACION CR ; 


Y como siempre que ocurre esto nos encon- 
tramos con nuevas palabras, sera necesario 
descender a un nivel inferior e intentar defi- 
nirlas a su vez. 

«PREGUNTA» se encarga de anotar el 
codigo Ascii de la teda pulsada y restarle 48 
(que corresponde al 0) para obtener en el ele¬ 
mento superior del stack el numero elegido. 
(Programa IX). 

PROGRAMA IX 

: PREGUNTA .* ES TU TURNO, FORASTERO. 
EL1GE. ' KEY 48 - ; _ 

Seguidamente «COMPROBACION» 
analiza si este valor esta dentro de lo estable- 
cido (1 a 4) y en caso de no ser asi eliminarlo, 
mediante un DROP, y volver de nuevo a la car 
ga preguntandonos por un nuevo dato. Ob -1 
serve en su listado (Programa X) una cosa muy 
curiosa: es una palabra «recursiva», es decir, 
que se invoca a si misma. 

PROGRAMA X 

: CGNPROBACION OUP 5 < IF DUP 8 > IF 
.■ CORRECTO.* ELSE / INCORRECTO.' 

DROP CR PREGUNTA CGNPROBACION THEN 
THEN ; __ 

Bueno, ya tenemos en el stack tres dafos: el 
indicativo del jugador, el numero total de mo¬ 
nedas y la cantidad a retirar. Para calcular las 
que queaan empleamos la palabra «QUE- 
DAN» que, sencillamente, resta los dos ele¬ 
mentos superiores (total y las que quitomos) 
y el resultado lo guarda de nuevo en la pila 
dejandola ahora con dos elementos. (Progra 
ma XI). 

PROGRAMA XI 

: QUEDAN - DUP QUEDAN ' . CR ; 

Y con esto ya tenemos totalmente daras y 
definidas cada una de las palabras que for 
man parte e intervienen dentro de la primiti¬ 
ve «JUEGO». Solo nos queda indicar que, 
una vez hemos salido del bude que la forma, 
el juego toca a su fin y ya no necesitamos el 
numero de monedas que quedan (es eviden- 
te que no hay ninguna). Por eso utilizamos un 
DROP al final dela palabra «JUEGO» para 



eliminarlo quedandonos solamente con el dis¬ 
tintivo del jugador que moveria a continua- 
cion. 

Y con este ultimo elemento pasariamos a eje- 
cutar la palabra «FIN» en la que: 

— Analizamos el siguiente jugador. 

— Si es el ordenador (o contiene un cero), 
quiere decir que hemos ganado nosotros y le 
concedemos la revancha. 

— Si ocurre lo contrario, el Amstrad nos 
habra dado una soberana paliza de la que es 
mejor no hablar. 

PROGRAMA XII 

: FIN 18 SPACES OUP 8= IF .* ME HAS * 
ELSE .* TE HE 1 THEN .* GANADO. SI * 
0= IF .* ME DAS 1 ELSE .* QU1ERE5 1 
THEN .* LA REVANCHA ESCRIBE MONEDAS.* 
CR ; __ 


jAlguna dificultad para compren- 
der el listado del Programa XII? Re- 

coge lo que tendria que hacer la palabra 

«FIN», 

Ya esta todo completo. Hemos descendido 
hasta el nivel mas bajo de la definicion de ca¬ 
da una de las nuevas palabras «Forth» co- 
menzando desde lo mas alto y general para 
terminar desarrollando tareas muy particula- 
res y concretas que cumplan unos requisitos 
muy espedficos. 

Pero en este metodo existe la pega de no 
poder «compilar», o «interpretar» en 
este caso, las palabras que contengan otras 
que todavia no esten definidas. 

A pesar de ello le recomendamos que ac- 
tue asi siempre que pueda, codificando sus 
programas de arriba a abajo sobre el papel 
y, una vez concluidos, pase a tedearlos en el 
Amstrad en el orden mas conveniente para 
evitar sorpresas. $De acuerdo? 

Pues disfrute con este nuevo lenguaje Forth. 
Compruebe que el stack ha quedado vacio te- 
deando la palabra (.). De no ser asi, algo no 
ha ido del todo bien segun las normas. 

Pues disfrute con este nuevo len¬ 
guaje Forth. 
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EL METODO INTEGRAL 
MAS FACE Y 


AKENDER 


C0NTR0LAD0 POR PROFESOR 


El Cjrso se compone de cinco discos FULL-MEMORY, que mcluyer up Test de Nivel para evaluar ios conocimientos 
del alumno, sesenta unidades completes (cor tres tipos distintos de ejercicios) de dificuitad progresiva, 
diez unidades especiaies que ahondan en Ios aspectos mas esenciales del idioma (con un juego cada una), 
un programa de Redaccion con'rolaoa y fibre, y un disco para practicas de conversacion que permite dialogar 
cor el ordenador sobre dtversos temas en lengua inglesa. 

Todos ios discos poseen un PLANNING para que el alumno organice su propio ritmo de trabajo 
y ouede controlar sus progresos. 

En resumen, 1 MEGABYTE de contenidos y programas configuran COMPUTER ENGLISH SYSTEM, enfocados 
para ayudarnos a aprender o reforzar nuestro INGLES de forma estimulante y sugestiva. 


CENTRAL ZARAGOZA- CAMBRIDGE SCHOOL Zurita, 21, IT izq. - Tel. 23 91 92 • ENTROS DIS1RIBI DOF ; BARCELONA' BARNA 
HOUSE. Rambla Catalunya, 112 L* Tel. 93-2187 846 • PAMPLONA THE ENGLISH FILM CENTRE. Dugue de Ahumada, 3, 2T Tel. 22 41 84 
CENTROS COLAB ■ BARCELONA: NOVALINGUA. Avda, Diagonal, 600 • SAXON SCHOOL Gran Via de las Cortes Catalanas, 437 





mi 


CES 

COMPUTER ENGUSH SYSTEM 

ZURITA 21 10izq..ZARAGOZA 


NOMBRE EDAD 

DIRECCION TEL. C. POSTAL 

POBLACION PROV. PROFESION 

Cada disco se complemerta con una cinta de cassette, grabada por profesores mgleses para que el alumno 

aprenda la parte oral. 

Precio curso complete: 24.900 pts. 

FORMA DE PAGO: □ TALON BANCARIO A CES. COMPUTER ENGLISH SYSTEM • 

□ GIRO POSTAL A CES. COMPUTER ENGLIS SYSTEM • P CONTRA REEMBOLSO MAS GASTOS 

DESEO RECIBiR EN Ml DOMICILIO LOS PROGRAMAS SENALADOS 













































FAIRLIGHT II 

El mapa, 
los pokes y 
todas 
las claves 
de un juego 
«superdiffcil» 


GAUNTLET 

Te descubrimos 
los secretos 
de un clasico de la 
mdquinas recreativas 










Monitor de disco 

^4 ver, entre nosotrosiquien no esta harto de cue le sucedan 
cosasforas a I disco, que normalmente oca' an en la 
mjsteriosa desaparicion de ficheros cruciales? 
Ademas, el disco es una especie de territorio vedado al 
sufrido usuario, algo asi como «EI Castillo Negro del 
lechicero Negro». Ya es hora de remediar este estado de 
cosas, y «Discidit» es el programa de hacer malabarismos 
con el disco, el programa es corto, bonito y usa un sofisticado 
estilo de programar. 



tor de disco que le permitira editor 
y manipular cualquier sector o pista- 
Siendo cuidadosos, incluso es facti- 
bje recuperar ficheros borrados ac- 
cidentalmente. 

Para poder usario a pleno gas, he- 
mos de tomar en consideracion co 
mo trabaja el sistema de disco de 
Amstrad. Existen tres formatos es- 
tandar: 

— Formato Sistema (CP/M). 

- Formato IBM (IBM PC y CP/M 
compatible). 

— Formato dates. 

fodos ellos tienen algo en comun: 
cada uno posee 40 pistas por disco, 
y los sectores son de una longitud de 
512 bytes. Las principals diferencias 
son el numero de sectores por pista 
y los numeros de sector. 


Los distintos 
formatos de disco 


Aquf hay una lista para cada for¬ 
mato: 

— Formato sistema: 

9 Sectores por pista 
numeros de sector, 65 a 73 

— Formato IBM: 

8 sectores por pista 
numeros de sector, 1 a 8 

— Formato datos: 

9 sectores por pista 
numeros de sector, 193 a 201 

No es necesario preocuparse del 
formato del disco que queramos edi¬ 
tor, porque DiscEdit hard el trabajo 
por nosotros; lo anterior es solo a tf- 
tulo informativo, y para el que desee 


modificar el programa por su cuen 
ta y riesgo, adaptandolo a sus nece- 
sidades concretas. 


Funcionamiento 
de DiscEdit 


Pasemos a estudiar como funciona 
DiscEdit. 

Teclee el programa y salvelo. Al 
arrancarlo, la pantalla cambiara a 
modo 2, se dibujara un espacio ce- 
rrado y se nos preguntara por una 
unidad de disco. Hay que responder 
0 (para el disco A) o 1 (para el B). 

FI disco seleccionado entrara en 
funciones durante un momenta. Dis¬ 
cEdit hace esto para averiguar el for¬ 
mato y otras cosas; el resultado de 
la operacion aparecera en la esqui- 
na superior derecha de la pantalla. 

Acto seguido, hay que indicarle al 
programa la pista incial donde ca- 
menzara la edicion (el «track», un 
numero comprendido entre 0 y 39. 
Logicamente, despues DiscEdit inqui- 
rira acerca del sector que deseamos 
editor. 

Como hemos indicado mas arriba, 
el numero de sector puede variar con 
el formato del disco; no se preocu- 
pe: el rango de valores aceptables 
aparecera siempre en pantalla. 

Al principio de cada Ifriea hay un 
numero hexadecimal que hace refe¬ 
renda al «offset» de los datos en el 
sector, esto es, el numero del byte del 
sectoi a partir del cual vamos a edi¬ 
tor, El resto de la li'nea muestra el 
contenido de ese byte, junto con el 
de los 15 bytes siguientes y su equi 
Valencia en formato ASCI!. 

La pantalla no es lo suficientemen- 
te grande para mostrar los 512 bytes 
de un golpe, asi que solo aparecen 
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256. La otra mitad se obtiene pulsan- 
do la tecla « 2 » del teclado numeri 
co (f2 en el 664 y 6128). Pulsandola 
una vez mas, se retorna a la prime- 
ra mitad. El numero siguiente a «pa 
gina» en la parte superior de la pan- 
talla indica la porcion que estamos 
viendo: 0 si es la primera 6 1 si es la 
segunda. A la izquierda del numero 
de pagina estan los de pista y sector 
en uso en ese momento. 

Hay a su disposicion una serie de 
opciones de edicion como examiner, 
leer y escribir pisfas y sectores. La ta 
bla numero 1 lista todo esto, junto 
con los controles de teclado corres- 
pondientes. 

**TABLA I** 

No obstante, la pagina de ayuda 
listara todos los comandos pulsando 
0 del teclado numerico (fo en 664 y 
6128). 

Si ocurre algun error de disco en 
el proceso de edicion, el mensaje 
aparecera en la parte inferior de la 
pantalla junto con el consabido men¬ 
saje de «RETRI, IGNORE 0 CANCEL?)). 

En este caso, es conveniente rein 
tentar, porque a veces funciona; no 
tenemos ni idea de a que se debe es¬ 
te comportamiento erratico del Ams- 
trad. 




Como usar discEdit 


Vamos a echar un vistazo a un ti- 
pico ejemplo de como debiera usar- 
se DiscEdit. 

Primero de todo, el disco debe se- 
leccionarse. En la mayoria de los ca- 
sos, respondremos 0, senalando el 
disco A. Lo siguiente es escoger pis¬ 


ta y sector: supongamos que introdu 
cimos 2 y 65, respectivamente. 

El sector se encargara del disco y 
aparecera en pantalla. Si, a pesar de 
todo, nos hemos equivocado, pode 
mos desplazarnos a traves del disco 
con las flechas del cursor, mantenien 
do apretada la tecla «SHIFT» 
(«MAY$» en el 6128). 

Por ejemplo, pulsando MAYS + 
cursor derecha, se cargari'a del dis 
co el sector 66 de la pista 2. Una vez 
que estamos en el sector deseado, 
podemos comenzar a editor. Hay 
dos formas de hacerlo: en hexade¬ 
cimal o en ASCII. Se selecciona uno 
y otro pulsando el 3 del teclado nu 
merico (f3 para 664 y 6128). 

En modo hexadecimal, los conte 
nidos se alteran entrando digitos del 
0 al 9 y letras de la «a» a la «f». Ob¬ 
serve que el teclado numerico no de¬ 
be usarse para los numeros; use las 
teclas encima de «QUERTY». 

El byte que esta siendo editado 
puede cambiarse moviendo el cursor 
de edicion al byte que queramos, 
pulsando las teclas del cursor apro- 
piadas. La otra posibilidad de edi¬ 
cion, como dedamos, permite enfrar 
caracteres ASCII; por ejemplo, si se 
teclea ABCD, apareceran los bytes 
&41, &42, &43 y &44. 

Se puede saber en que modo de 
edicion estamos observando donde 
se encuentra el cursor; si esta enci¬ 
ma de los numeros hexa, estamos en 
modo numerico, de lo contrario en 
ASCII. Una vez que el sector se ha 
dejado a nuestro gusto, podemos es- 
cribirlo en el disco. Para ello, basta 
pulsar la tecla 4 del teclado numeri¬ 
co (f4), y responder afirmativamen- 
te a la pregunta de si estamos segu 
ros. Es el momento de descubrir co¬ 
mo guarda el Amstrad la informa 
cion en el disco. 


Tabla 





0p d r «de p^“ J to 

St cursor izq r da 

SH Cursor arnba 

SB;Cursor abato 

CoSandosJeeditiin 

1 Cursor izquierda 
Cursor derecha 
Cursor arnba 

Cursor abaio eon trol 
Otras teclas d ^ e j 454) 

1 (Teclado nufn '; a co C PC664-6128) 

1 0 ifi CPC664-6128) 

' 1 CPC664-6128) 

2 F3 CPC644-6128) 

3 fa CPC664-6128) 


Siguiente sector 
Sector anterior 
Avanza una pista 
Retrocede una pista 

„bylek«»lo'“ < t" ie r 1 ° 

ZZ*^****" 

una Lmea arriba 
una tinea aba\o 


pagina de C Y^° d disco 

Nuevos parametros 


AMSTRAD CPC 



























1* REM OISCEDIT 

28 REM <« AMSTRAD SEMANAL 


38 REM 

48 MODE 2:INK 8,1 :INK 1,2<S:PAPER 8 
56 MEMORY &?FFF:GOSUB 1278:' POKE FAC 
HINE CODE 

<8 60SUB 638:' INITIALISE 
78 WINDOW SWAP 8,1 
88 GOSUB 788:' DRAW SCREEN 
98 CLS 

188 7=8 :CC=8 :CR=8 :WD=4 :U]=24 :OFF=64 sV 
*= 0 $ 

118 PRINT CKR*<23);CHR$<1);:TAG !UD:G 
OSUB 548:POKE 4988C,488:GOTO 328 
128 S*=":F=8:WHILE SS=":C=8:F=F XOR 
1 :MGVE OFF+CPWl 4T*8,334-CR* 16:PRINT 
1UD,CHR$<143) j :WHILE S*=” AND C<20: 
C=C+1:GOSUB ?58:WEND:WEND:IF F=1 THEN 
MOVE OFF+CC*WI+T*8,334-CR#1A:PRINT 8 
WD,CHR*<143>; 

138 ADDRESS=PEEK(&988B)+PEEK«c908C)*2 
56+CC+CR*16 

148 IF ASCCSIX237 THEN 358 
158 IF ASC(Sf)<239 THEN GOSUB 1238:IF 
«4='N' THEN 128 

168 IF ASC(S*)=237 THEN K*=*write’:GO 

SUB 488:8010 128 

178 IF ASC(S$)=238 THEN 1258 

188 IF ASC(S$)<244 THEN 1148 

198 IF ASC<S$)=246 THEN !288 

288 IF ASC(S$)=24? THEN GOSUB 928:G0S 

UB 780:GOSUB 820:GOTO 338 


218 CC=8;CR=0:T=8:CLS 


/ 



228 IF ASC(S$)=245 THEN POKE 4988C.PE 
EKC4988PX0R 1:60T0 338 
238 IF ASC<S*)=251 THEN sedor=sedor 
<1 

240 IF ASC(S$)=258 THEN sedor=sedor 
-1 

258 IF ASC(S$)=248 THEN track=track4l 
268 IF ASC(S$)=249 THEN track=track-l 
276 IF ASC(S$)=244 THEN GOSUB 546:P0K 
E 49B8C,488 

288 IF sedor>FSN*R THEN sedor=FSN:t 
rack=track+l 

298 IF $ector<FSN THEN sedor=FSN«R:t 
rack=track-l 

398 IF track<8 THEN track=39 
318 IF track>39 THEN track=8 
328 K^'read' :G0SU8 488:IF P£EK(498E3 
)<>8 THEN 128 

338 LOCATE 11,8,3,-PRINTIl,drive:L0CA7 
E ll,19,3:PR3NTll,track:LOCATE 11,31, 
3:PRINT11,sec tor:LOCATE Ml,42,3;PRINT 
11,PEEK<&988PAND 47F:LQCA7E 11,58,3: 
PRINT*],A* 

348 LOCATE 12,1,1:WIND0W SUAP 8,2:TAG 
OFF *WD:CLS13:CLS14:CLS15:CALL 49888: 
TAG 1UD:W1ND0W SWAP 8,2:G0T0 128 
358 IF T=1 AND WD=4 THEN POKE ADDRESS 
,<PEEK(ADDRESS) AND 4F8)4VAL< , 4'4S*) 
368 IF T=8 AND WD=4 THEN POKE ADDRESS 
,(PEEK(ADDRESS) AND 4F)4VALC'4*4S*)*1 
6 

376 IF WD=5 THEN POKE ADDRESS,ASC<S$) 
388 LOCATE 11,94CC*3,54CR:K*=HEX*CPEE 
K(ADDRESS)):IF LEN<K$)=1 THEN PRINT*! 

IQI i 

I " i 

398 PRINT!1,K$:L0CATE #1,59+CC,5+CR:K 
*=V:IF PEEK<ADDRESS)>31 THEN K$=CHR 
KPEEK(ADDRESS)) 

488 PRINT!!,K$j 

418 IF WD=4 THEN T=T XOR 1:IF T=8 THE 
N COCC+1 

428 IF WD=5 THEN CC=CP1 
438 IF CC=16 THEN CC=8:CR=CR4l 
448 IF CC=-1 THEN CC=15:CR=CR-I 
458 IF CR=16 THEN CR=8 
468 IF CR=-1 THEN CR=I5 
478 GOTO 128 

488 J=PEEKC498E5):U=PEEK(498E6) 

498 POKE 490E5,track:POKE 498E4,drive 
:POKE 498E6,sedor:P0KE 498E3,8 
588 IF ASC(K$)=114 THEN CALL 498B1 EL 
SE CALL 498C3 

518 IF PEEK(490E3)<)8 THEN CLSiPRINT" 
Disk ';K$;‘ error, Track:’jtrack;'Sec 
tor:' jsedorjCHMC?) :track=J:sedor=U 
:T$=":WH1LE 7*=" :T*=INKEY*:WEND:CLS 

: RETURN 

528 IF ASC(K$)=119 THEN PRINT’Sector 
written success-fully'jCHRX?) 


538 RETURN 
540 GOSUB 828 

558 CLS:LOCATE 1,1sPRINT'lnput Drive: 
’;:nc=l:rai=6:raa=l:GOSUB 848:drive=VA 
L(w$):LOCATE 1!,8,3:PRINTil,drive 
568 IF drive=8 THEN !A ELSE IB 
578 FSN=PEEK<PEEK(DPH416*DRIVE)4PEEK< 
DPH41416*DRIVE) *256-* 15) 

588 R=8:IF FSN=441 THEN a$='SYS7EM' E 
LSE IF FSN=4C1 THEN a*='DATA ' ELSE 
a*=*lBM ':R=7 
598 LOCATE 11,58,3:PRINT11,a* 

688 CLS:LOCATE 1,1 iPRINT'lnput Track: 
*; :rtc=2:rii=0 :ma=39:GQSUB 840: track=V 
AL(wl):LOCATE *1,19,3:PR1NT#1.track 
618 CLS;LOCATE l,l:PRlfTT CHRt<22);CHR 
$(1)j'Input Sector ;CHR$<8);FSN;CHR 
!(8);CHR$<8);FSN4R;CHR$(8);'): 
CHR^<22) ;CHR$(0) j :nc=3:mi=FSN:r*a=FSN4 
R:GOSUB 848:sedor=VAL(w$):LQCATE 11, 
31,3:PRINT11.sectorj' ' 

628 CLSiRETURN 

638 CALL 4908E:'init machine code 
648 0PH=PEEK(4BE48)4PEEK(4BE41)*256+1 
8:D$= ’8123456789ABCDEF" 

658 KEY DEF 14,8,245:KEY DEF 5,8,246 
668 KEY DEF 15,8,247:KEY DEF 28,8,237 
678 KEY DEF 12,8,238:KEY DEF 13,8,244 
688 KEY DEF 2,1,241,249,249 
698 KEY DEF 8,1,248,248,248 
788 KEY DEF 8,1,242,258,258 
718 KEY DEF 1,1,243,251,25! 

728 POKE 49888,8:POKE 4908C,488 
738 WINDOW Ml,1,88,22,25:UINDOW 12,2, 
88,5,25:W1ND0W 13,2,6,5,28 :W1ND0W 14, 
9,56,5,28:W1ND0W 15,59,75,5,28 
748 RETURN 

758 S*=1NK£,Y*:IF <SXCHR*<237) OR Si> 
CHR$<252)) AND INSTR("4V*,UPPER*(S*) 
)<2 AND LEN(V$)>8 THEN S$=" 

768 IF VX>“ THEN S4=UPPER*(S*) 

778 RETURN 

788 CLS 11:PEN U,1:L0CATE Ml,1,1 :PR1 
NT11,'Arastrad Disc Sector Editor.' 

798 HOVE 0,388:DRAWR 216,8 
888 MOVE 8,72:DRAWR 0,272:DRAWR 688,8 
:DRAWR 8,-272:DRAWR -688,8:M0VER 48,8 
:DRAWR 8,272:M0VER 485,B:DRAWR 8,-272 
818 RETURN 

828 LOCATE 11,1,3:PRINTli,'Drive: 
Track: Sector: page: 

Format: ':RETURN 

830 nc=2:mi=2:ma=10 
848 w$=" 

858 s*=":WH 1LE sf=" OR LEN<i4)=nc A 
ND s$OCHR$<127) AND s$OCHR$(13) OR 
s$=CHR$<127) AND w$=" :s*=3NKEY*:UEND 
868 IF s$=CHRf(13) THEN 988 
878 IF s*=CHR$<127) THEN w$=LEF7*(w*, 
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1850 PRINT' F0 ... Help.' 

I860 PRINT* FI ... Select new disk p 
arameters.' 

1378 PRINT' F2 ... Page toggle, (tog 
gles display between bytes' 

1888 PRINT" 8-? 

55 & 256-511 oF a sector).' 

1898 PRINT' F3 ... Toggles between H 
EX & ASCII Tor editing.' 

1188 PRINT' ... Writes sector to 
disk.’ 

1110 PRINT’ T5 ... Exit program.' 

1128 LOCATE 38,2A:PRINT CHRX24);' PR 
ESS SPACE TO EXIT ' ;CHR*(24):s*=" :WH 
HE s$<>' ':s*=lNKEY*:UEND 
1130 CLS:U1ND0U SWAP 8,1:RETURN 
1148 IF ASC(S*)=243 THEN 418 
1158 IF ASC(Si)=242 AND WD=4 THEN T=T 
XOR 1:IF T=1 THEN CC=CC-1 
1160 IF ASC(S*)=242 AND UD=4 THEN 430 
1178 IF ASC(SI)=242 AND WD=5 THEN CC= 
CD-H60T0 430 

1188 IF ASC(S*)=246 THEN CR=CR-!:GOTO 
458 

1198 CR=CR-* 1 s GOTO 450 
1288 TAGOFF »:WD=«D XOR IsTAG *UD:T 
=8 

1218 IF UD=4 THEN W1=24:QFF=64:W=D* 
ELSE UI=8:QFF=464:V$=" 

1228 GOTO 126 

1238 IF ASC(S$)=237 THEN K*='Save sec 
tor* ELSE K$="Quit program' 

1248 LOCATE 1,1:PRINT K*;' ARE YOU SU 
RE (Y/N)?' ;CHR$(?); :1N=" :WHILE 1NSTR 


("*YN' ,H$X2:H$=UPPEW(1NKEYI) :UEND:C 
LS:RETURN 

1258 TAGOFF 1M):PR1NT CHR$<23);CHR*(0 
):N0DE 1: CALL &BB08 
1260 END 

1270 IF PEEK(&9008)=&DD THEN RETURN 

1288 RESTORE 1368 

1290 CHECKSUM=8 

1300 FOR G=&9008 TO A98DC 

1310 READ B*;P0KE G,VAL('&'4BI) 

1328 CHECKSU^CHECKSUN+gALCi'm) 

1330 NEXT 

1348 IF CHECKSUN=3B232 THEN RETUKT 
1350 PRINT 'M/C DATA ERROR*;CHR*<7) 

1360 DATA DD,2A,8B,98,DD,E5,C1,78,E6, 
7F 

1378 DATA 32,80,98,CD,62,98,79,32,80, 
90 

1388 DATA CD,62,98,DD,E5,86,83,CD,81, 

98 

1398 DATA 86,18,DD.7E,80,32,80,98,CD, 
62 

1488 DATA 90,3E,20,CD,5A,BB,DD,23,18, 
EE 

1410 DATA 86,02,CD,81,98,00,El,86,10, 
DD 

1420 DATA 7E,08,FE,20,D2,45,98,3E,2E, 
C5 

1430 DATA CD,5D,BB,C1,DD f 23,l0,ED,3E, 
3D 

1448 DATA CD,5A,BB,3E,8A,CD, 5A,BB,DD, 
E5 

1458 DATA Cl,3E,80,69,02,84,90,09,21, 
8D 

1468 DATA 90,ED,6F,CD,70,90,ED,6F,CD, 
7i 

1478 DATA 98,C9,E6,0F,C6,38,FE,3A,FA, 
7B 

1480 DATA 98,C6,8?,C5,CD,5A,BB,C1,C9, 
C5 

1490 DATA 3E,89,CD,5A,BB,C1,!8,F7,C9, 

BB 

1588 DATA 88,88,DD,21,DD,98,21,DB,90, 
CD 

1518 DATA D4,8C,DD,75,80,DD,74,81,DD, 

71 

1528 DATA 82,21,DC,98,CD,D4,BC,DD,?5, 

83 

1530 DATA 00,74,84,00,71,85,09,21,80, 
88 

1548 DATA ED,5B,E4,98,3A,E6,98,4F,DF, 
DD 

1558 DATA 98,D2,05,98,09,21,08,88,ED, 
5B 

1568 DATA E4,90,3A,E6,90,4F,DF,E8,90, 
D2 

1578 DATA D5 ,99,C9,3E,FF,32,E3,90,C9, 

84 

1580 DATA 85 
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LEN(wi)-l)'.PRINT CHM<8);CHR*<14); 

888 IF s$()CHR$(12?) THEN PRINT si;:w 
1=wHs* 

898 GOTO 858 

988 IF VAL<w$)<ni OR WL(w*))ma THEN 
FOR a=l TO LEN(w*):PRlNT CHR*(8);CHR* 
(16);:NEXT:PRINT CHR*(?);:G0TQ 843 
918 RETURN 

928 WINDOW SWAP 8,1:CLS 

930 LOCATE 31,1 :PR1NT CHRX24);' *COM 

MAND MENU* ';CHR*(24) 

948 LOCATE 1,3:PR1NT CHR*(24);“ Hog in 
g to new track or sector:';CHR$(24) 

958 PRINT' (SHIFf) '4CHRX243N' ... 

move -Forward one sector. 8 
968 PRINT' (SHIFT) *4CHR$(242)4' ... 

mooe back one sector.' 

970 PRINT' (SHIFT) '4CHR*(240)4' ... 

rsove Forward one track.' 

980 PRINT' (SHIFT) '4CHR$(241)4' ... 

move back one track.' 

990 LOCATE 1,9:PRINT CHRf(24);' Editi 
ng commands:';CHR$(24) 

1800 PRINT' MCHRi(243)+' ... move r 
ight one byte." 

1810 PRINT' '+CHRI(242)4' ... move 1 
eFt one byte." 

1820 PRINT" '4CHR4(241)+" ... move d 
own one line.' 

1830 PRINT' *4CHRI(248)4' ... move u 
p one line.' 

1848 LOCATE 1,15:PR1NT CHR*(24);' Oth 
er command keys (numeric KEY pad):';C 
HR*(24) 


















iPOR QUE NO TRUCAR 
EL CP/M 3.0? 

Francisco G. R. 


De todos es sabido los trucos que podemos utilizar en Basic 
para nuestras a plica clones, y tan sigilosamente guardamos 
para nuestros programas. Pues bien, estas tambien las 
podemos encontrar en el CP/M. 


crearnos un 
fichero autoejecutable desde 
CP/M? 

Lo podemos hacer de varias 
maneras, una de ella serfa 
urilizando un procesador de textos 
e introducir los mandates u 
ordenes deseadas. Por ejemplo, 
supongamos que cuando 
cargamos cl CP/M, 
necesariamenfe tenemos que 
preparar el canal de la impresora 
y a continuacion ejecutar un 
programa: 

DEVICE CONIN = LPT 
PROGRAMA. COM 

Esto nos dard una entrada al 
canal de impresora para mandar 
toda la salida del monitor a la 
impresora. Si no dispusieramos de 
un procesador de textos los 
hariamos desde Basic de la 
siguiente forma: 

10 OPENOUT "DISC.SUB" 

20 PRINT #9, "DEVICE 
CONIN = LPT" 

30 PRINT #9, "PROGRAMA. 

COM" 

40 CLOSEOUT 

Lo ultimo que nos falta decir es 
el nombre del fichero y como 
ejecutarlo. Si lo queremos 
ejecutar, el nombre del fichero 
cargador serfa "PROFILE. SUB", 
si lo queremos cargar cuando 
entremos en el sistema serfa un 
tftulo diferente al de "PROFILE". 
Pero ademas debe de estar 
presente en el disco del programa 
"SUBMIT.COM", que es el 
encargado de leer los ficheros 
terminados en 'SUB. 

tComo simular un arranque tipo 
profesional de IBM, en el cual nos 



pregunte la fecha y la hora? 

La creacion del fichero 
autoejecutable esta descrita 
anteriormente, ahora tan solo 
tendrfamos que introducirle los 
ficheros adecuados para que 
pueda ejecutar esta orden. El 
richero encargado de cargar el 
reloj del equipo y ponerlo en hora 
se denomina 'DATE'. Si el primer 
fichero que introducimos es el de 
'DATE', nos mostrara la fecha que 
tiene irriplfcita y el dfa, tambien 
nos dira el tiempo que llevamos 
con el ordenador encendido (o 
bien desde la ultima vez que 
efectuamos un Reset). Si le damos 
la opcion de: 

DATE CONTINUOUS (tambien es 
valido solo la C) 

El ordenador nos mostrara el 
reloj en tiempo real que podemos 


ver como va avanzando segundo 
a segundo. Pero si queremos tan 
solo que nos pida la fecha y la 
hora la opcion sera la siguiente: 

DATE SET 

El ordenador nos pedira 
primero la fecha y a continuacion 
la hora, si bien pulsando la tecla 
de Return dejarfamos el valor que 
tiene por defecto. 

Todos sabemos como sacar un 
listado desde CP/M con el 
comando TYPE PROGRAMA.TXT, 
pero si el fichero tiene por 
extension un COM, REL, etc., el 
ordenador nos muestra una serie 
de sfmbolos y caracteres no 
legibles, ^podriamos listar un 
programa con la extension COM, 
REL, etc.? 

Sf, es posible j>pero como?, pues 
bien tan solo debemos utilizar un 
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la capacidad de los programas 
que tiene en el disco. Usted 
podri'a hacer dos cosas, la 
primera era irse a Basic, efectuar 
un CAT, en el cual sf le dice la 
capacidad, y la segunda 
seria utilizer un DIR 
l FULL |. Pero esta 
ultima opcion es un poco 
enmaranada, y nosotros 
le vamos a dar una en 
la que se sienta tan 
familiar como el 
CAT de Basic: 


comando de CP/M 
denominada 'DUMP'. El 
comando DUMP nos da un listado 
del programa en dos formalos: 
una a la izquierda con los codigos 
hexadecimales, y una segunda a 
la derecha en forma ASCII. De 
esta forma, y si previamente 
hemos instalado la impresora, 
podremos realizar un listado por 
impresora o bien por pantalla de 
los programas que no podemos 
acceder a ellos mediante un TYPE. 

^Como utifiza usted el comando 
DIR? ^Le gustaria sacarle mas jugo 
a este comando? 

Si esta dispuesto, adelante. 
Posiblemente usted no se sienta 
satisfecho con solo utilizar el 
comando DIR a secas, pues 
muchas veces le gustaria conocer 


DIR I SIZE ] 

Tambien podemos 
excluir ficheros 
cuando deseemos 
sacar un directorio 
del disco, por 
ejemplo, cuando 
tenemos muchos 
programas en el disco 
y solo queramos sacar algunos en 
determinado. Esto lo podemos 
conseguir con el atributo entre 
corchetes 

I EXCLUDE = PROGRAMA.EXT 1. 
Hablando de excluir programas si 


solo queremos sacar los 
programas que esten en 'READ 
ONLY', (programas solo de 
lectura) el atributo sera 'RO', y si 
solo queremos los 'READ WRITE', 
(case contra rio a I anterior, 
escritura y lectura) el atributo 
seria 'RW'. Para finalizar esta 
parte de excluir programas o solo 
sacar programas en determinados 
hay otra opcion que nos muestra 
los programas que son invisibles 
(programas en sistema), que se 
denota como 'SYS', aunque 

tambien se puede 
efectuar con el 
comando 
DIRS o 


DIRSYS. 

Para acabar las opciones DIR 
vamos con una muy curiosa, 
consiste en sacar un numero de 
lineas determinado a partir del 
encabezamiento. O sea, que 
podemos listar los programas del 
disco de tres en tres lineas o de 
diez en diez programas (cinco 
lineas). El comando es el 
siguiente: 

DIR I LENGTH = 10l 

A lo mejor cuando estamos 
borrando ficheros desde CP/M, 
nos encontramos que borramos 
alguno que no querfamos, sobre 
todo cuando borramos una serie 
de estos que comienzan con la 
misma letra, pero hay uno de 
ellos que no querfamos borrar y 
lo hemos destruido. Pues bien, 
nosotros podemos obligarle al 
ordenador que nos pida permiso 
o conformidad para que efectue 
el borrado de cualquier 
programa. Esto lo realizaremos de 
ia siguiente forma: 

ERAse [ CONFIRM I (o bien tan 
solo C) 

De esta forma tan solo nos 
borrara los programas que 
nosotros le indiquemos. 
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IVA 


autonomo podra llevar perfectamente su IVA 
sin ningun tipo de limitacion, debido a que el 
numero de cuentas y movimientos en un prin- 
cipio es suficiente para cualquier aplicacion, 
aunque esta se extienda a empresas peque- 
nas. 


DISTPIBUIDOR ZELIG SOFTWARE 
AMSTRAD CPC 6128/664/464 CON DISCO 

Victor Prieto 

Profesionales liberates, autonomos y 
demos personas acosadas por el IVA, 
hallaran en el Control del IVA de Zelig, la 
solueion comoda a los quebraderos de 
cabeza de las declaraciones trimestrales . 


I ingreso de Espana en 
la Comunidad no solo nos ha dado un carac- 
ter mas europeo y ha propiciado la apertura 
de las fronteras al comercio, ademas nos ha 
Iraido un regalo que encontramos hasfa en la 
sopa: el IVA. 

Antes ; con pagar simplemente bastaba, 
ahora hemos de pagar el recargo del IVA, 
ahora todos somos recaudadores de Hacien¬ 
da y el IVA que se nos abona hemos de de- 
volverlo escrupulosamenfe, pues como dice la 
cancion: «Todos somos prisioneros de Hacien¬ 
das. 

Como con esta entidad las cuentas deben 
ser claras y Hacienda tarde o temprano aca- 
ba enterandose de todo, gracias a su poten- 
cial inforrnatico, jP 01 " no utilizar sus mis 
mas armas? 


Poniendo a la informatica de nuestro lado, 
pademos llevar un control completo de nues- 
tras facturas con el programa de Zelig. 


Caracteristicas 


El Control de IVA, tiene capacidad para ma 
nejar hasta 150 cuentas entre clienfes y pro- 
veedores, cada una de las cuaies ha de ser 
identificada por un codigo de cinco digitos, los 
cuaies pueden ser ajustados a la normativa exi- 
gida en el Plan General Contable. En este ca- 
so, los clientes quedaran agrupados en el sub- 
grupo 43, y los proveedores en los capifulos 
40,41,42. 

Por otra parte el fichero de apuntes que es 
capaz de soportar el programa, asciende a 
2.000 anotaciones, susceptibles de ser borra- 
dos una vez alcanzado el tope. 

Con tal capacidad cualquier profesional o 


Personalizacion 


Como todos los programas de la casa, este 
puede ser personalizado, cosa que no resulta 
ooligatoria, en nuestro caso si elegimos la per- 
sonalizacion, nuestro nombre aparecera en lis- 
tados e informes impresos, en caso de no pro- 
ceder a esta, fambien puede usarse sin ningun 
tipo de problemas. 

En este caso no existe codigo de cliente, con 
lo cual evitamos el tema de tener que intro- 
ducirlo en la aplicacion numero 100 del mis- 
mo, evitando el riesgo de que por error u ol 
vido este quede totalmente inutilizado. 

Por el mismo motivo, y ante la ausencia del 



NOMBRE DE LA EMPRESA: INGESTIGACION SA 

PERIODO § OCTUBRE/OCTUBRE 

FECHA RECEP COD. PROGEEDOR 

LIBRO REGISTRO DE 

B. IMPONIBLE 

FACTURAS 

TIPO 

PAGINA 1 

RECI61 DAS 

CUOTA 

05/10 

01000 

40001 

PAPELERIAS FOLEO DE 

ORO 

15,000 

127. 

1 ,800 

05/10 

01000 

40001 

PAPELERIAS FOLEO DE 

ORO 

15,000 

57. 

750 

12/10 

01001 

40002 

PINUTRAS JACINTO SA. 


40,000 

127. 

4,800 

12/10 

01001 

40002 

PINUTRAS JACINTO SA. 


40,000 

5/ 

■ 2,000 

15/10 

01082 

40003 

MOBILIARIO GARCIA Y 

CIA. 

200,000 

367. 

60,000 

15/19 

01002 

40003 

MOBILIARIO GARCIA Y 

CIA. 

28 0,000 

77. 

14,000 

12/10 

01003 

40004 

DEC0RACION AMBIENTE 

SA. 

75,000 

127. 

9,000 

12/10 

01003 

40004 

DECORACION AMBIENTE 

SA. 

75,000 

5/: 

3,750 

07/10 

01004 

40005 

MATERAL OFICINA PEREZ 

34,000 

127. 

4,080 

0 7/10 

01004 

40005 

MATERAL OFICINA PEREZ 

34,008 

5/ 

1 ,700 

22/10 

01005 

40006 

INDOSTRIAS CORRAL E 

HI JOS 

77,000 

127. 

9,240 

22/10 

01005 

40006 

INDUSTRIAS CORRAL E 

HI JOS 

77,000 

57. 

3,850 

15/10 

01006 

40007 

C0MPUEST03 ACI DOS SA. 

23,000 

127. 

2,760 

15/10 

0 1006 

40007 

COMPUESTOS ACIDOS SA. 

23,000 

57. 

1,150 




TOTAL I 

. G . A . 

SOPORTADO: 


118,880 
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la complete confianza de que estas van a fun 
clonar sin ningun fipo de problema. 

Una vez realizada la personalizacidn pode- 
mos poner en marcha el programa y empe- 
zar a trabajar para Hacienda. 


Menu principal 

Con el siguienfe repertorio funcional pode- 
mos elegir la actividad deseada. 

FI: Introduction de apuntes. 

F2: Consultas y listados 
F3: Altas clientes/proveedores 
F4: Bajas clientes/proveedores 
F5: Listado clientes/proveedores 
F6: Initialization de ficheros 
7: Correction de apuntes 

Para empezar a trabajar con el pro¬ 
grama, la primera opera- 
cion a realizar es 

***-«■***“ 


Mes del apunte 
Numero de factura 
Codigo de cliente/proveedor 
Fecha de la faefura 
Base imponible 
Tipo de IVA 
Recargo 

Observando el numero de apartados y su 
indole podemos advertir que se contemplase 
todos los datos interesantes y de utilidad en 
cada factura, con los cuales llevar el control 
de nuestro IVA. 

La insercion d^ datos en cada carnpo se rea¬ 
lize de forma comoda y solo es necesario in¬ 
troduce valores numericos, el ordenador se 
encarga de buscar en memoria el articulo al 
que corresponde el codigo e imprimirlo en su 
correspondiente aparlado. 


la uiilizada para estos menesteres podemos 
conseguir los siguientes datos: 

Listado de facturas emitidas 
Listado de facturas recibidas 
Cuentas con clientes 
Cuentas con proveedores 

Las consultas de facturas se realizan por fe¬ 
cha, determinando el comienzo y fin de dicha 
consulta, para las cuentas de clientes o pro¬ 
veedores, esta se realiza entre los plazos fija- 
dos y la entidad o persona elegida. 

Fuera de esta opcion podemos obtener un 
completo listado de todos 
los clientes y _ 




QlV'lA 




COO*- 


.\T£* 

, IV' 


f0 TOG^ 








gov 


■\e< 


A?OV'^ 


et-G 


tip° 


c.uota 

00 ® 
,, ^0® 


cnJBpe 


00 ® 


uno. 


50 ,®®^ 

r\ ^-.-""""'7. G 0^ z 7.-- 

V-j .-rOO^^ ' 1 .0 - Eneste carnpo, 

A *; r 'A ' -rQV F 5 * _— al teclear el numero de mes 

——-' aparecera automaficamenie escrito el nom- 

bre de esta, siguiendo similar proceso al po¬ 
ner el codigo de cliente aparecera el nombre 
del mismo, una forma acertada de captar los 
datos. Como siempre en caso de error y an¬ 
tes de que la ficha quede grabada, podemos 
volver a cualquier carnpo anterior y modificar 
lo que deseemos. 


o, . 


c v0® 


proveedores me- 

diante la F5, en el cual apareceran 
separados en dos grupos segue la indole de 
cada 


la de dar 
de alta a los clientes y 
proveedores, operaciones que es aconseja- 
ble hacer ufilizando la codificacion ajustada 
al Plan General Contable. 

Ufilizando la opcion n.° 3 del menu proce- 
demos a rellenar el fichero de clientes y pro¬ 
veedores, cada uno de los cuales dispone de 
un codigo numerico de 5 cifras y una longi- 
tud de texto de 28 caracteres. 

En caso de error, y siempre antes de pulsar 
la teda ENTER, podemos volver al apartado 
anterior, es decir el codigo con un toque de 
tecla, en caso de advertir nuestro error des¬ 
pues del ENTER, la opcion F4 nos saca del 
apuro borrando de los ficheros el cliente y su 
codigo. 


Libro de 
apuntes llenos 


Consultas e 
information imprests 

Toda la informacion puede ser obtenida por 
pantalla o impresora, en la opcion F2 que es 


En caso de agotar la capacidad de registrar 
apuntes del programa 2.000, podemos pro- 
ceder al borrado de los mismos para continuar 
trabajando. Antes de realizar tal operacion es 
imprescindible obtener un listado de todos los 
movimientos, con el cual guardaremos uno in 
formacion indeleble para cualquier consulta. 
Otro metodo valido, puede ser realizar una 
copia complete del disco; programa+ficheros, 




Diario de apuntes 


Una vez dados de alta todos los profesio- 
nales y empresas con los que vamos a trabo' 
iar, podemos iniciar el proceso de anotacio- 
nes y apuntes en el diario. 

Este esta estructurado en forma de fichas, 
cada una de las cuales contiene los siguientes 
apartados: 


NOMBRE DE LA EMPRESA: INVEST! GAC:I ON SA 

PERI ODD: OCTUBRE/OCTUBRE 

FECHA FACT. COD. CLIENTE 

LIBRO 

B 

REGISTRO DE 

IMPONIBLE 

FACTURA 

TIPO 

PAGINA 1 

S EMITIDAS 

CUOTA 

12/10 

04560 

43001. 

INOSUTRIAS ClOMERCIAL 



40,000 

12/ 

4,800 

12/10 

04560 

43001 

1NDSUTRIAS COMERCIAL 



40,000 

5/ 

2,0 6 0 

15/10 

O230 0 

430 0 2 

FOTOGRAFIA JULIAN GOMEZ 


50,000 

127. 

6,000 

15/10 

a 2300 

43002 

FOTOGRAFIA JULIAN GOMEZ 


50,000 

5/ 

2,50 0 

20/10 

4360 1 

43003 

ESTUDIO ALFA PUBLICIDAD 


100,000 

12/ 

12,300 

26 /1 0 

43001 

43003 

ESTUDIO ALFA PUBLICIDAD 


100.000 

5/ 

5,000 

17/10 

0 1 222 

43B04 

AC-ENCIA INFORMACION & 

CO. 


35,000 

1 27 

4,200 

17/10 

0 1 222 

43004 

AGENCIa INFORMACION & 

C-0. 


35,000 

5/ 

1 ,750 

0 3/10 

430 0 5 

43005 

IDI DMAS EL INGLES 



70,000 

1 2/ 

S , 400 

08/10 

43005 

4 30O5 

IDIOMAS EL INGLES 



70,000 

5/ 

3,50 0 

1 9/1 O 

0 4 220 

430O6 

ACADEMIA MATEMATICA Y 

CIA 


23,000 

12/ 

2,73C< 

19/10 

0 4220 

43006 

ACADEMIA MATEMATICA Y 

CIA 


23,000 

5/ 

1,150 

19/10 

55001 

43007 

CONDUCCIONES EL CANAL 



120,000 

127 

14,400 

19/10 

55001 

43007 

CGNDUCCIONES EL CANAL 



120,000 

5/ 

4,000 

1 Ad 1 0 

23081 

43008 

ALCHOLERA GRANAOINA 



55,000 

127 

4 , *0O 

1 4/1 0 

230CH 

43008 

ALCHOLERA GRANAOINA 



55,000 

5/ 

2,750 




TOTAL I.O.A. 

REPERCURTIDO: 


33,310 
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con io cud si que no perderemos ni un solo 
bit. 

La actualization de los ficheros del cuader- 
no de apuntes y su puesta a cero se ejecuta 
con la F6, antes de proceder a la cual, el or 
denador nos aviso de que se van a perder los 
ficheros y nos pide confirmation. Realizada es- 
ta podernos seguir introduciendo apuntes has- 
ta agotar de nuevo la capacidod. 


Instrucciones 

La extremada sencillez del software del IVA, 
hace casi innecesario el uso de instrucciones, 
de todas formas y para la toma de contacto 


cortas. Cualquier usuario puede hacerse con 
el dominio del programa en dos horas de ins¬ 
truction. 


Recapitulcscion 

ZELIG nos obsequia con un programa de 
manejo sencillo y de una eficacia y prestacio- 
nes grandes para su uso. 

Con un amplio dossier de informes impre- 
sos y consultas por pantalla, nada escapara 
a nuestros ojos y podremos tener amplia in¬ 
formation de nuestros movimientos de clien- 
tes y facturas. 


con que estemos operando, resultando lento 
la ejecucion cuando se trabaja con cifras ele- 
vadas. 

Es imporfante resenar que al final de la uti 
lizacion el programa realize un cierre de fi¬ 
cheros, por lo que no debemos exfraer el dis¬ 
co hasfa haber conduido todo el trabajo y sin 
dejar al programa realizar las operaciones fi¬ 
nales del disco, en este punto un corte fortui- 
to de la energia puede estropear el trabajo de 
varias horas, las copies de seguridad nunca 
estan de mas. 

Un programa sencillo y eficiente con el que 
Hacienda y las dichosas dedaraciones trimes- 


' 0N 

HOMBRE DE LR 

PER |dO. OCTUBRE/O0TUBRE 


libro 


B 


FECHA FACT 


coo. clients 


04560 
@4560 
0 2300 
02300 
43001 
43001 
01222 
01222 
43005 
43005 
04220 
04220 
i 55001 
, 55001 

* 23001 

0 23001 


4300 1 
4300 1 

43002 

43002 

43003 
43003 
4300 4 

4300 4 
43005 

43005 

43006 

43006 
43002 

43007 

430 03 

43008 


■rciiTRlAB COMERC1AL 

1NDSUTR1A- rnM FRClAL 
1n dsutrias come g0ME2 
fotografia he2 

FOTOGRAFIAFA PDIBL1C1DAD 

41 co ' 

'id'omas el V 

ACADEMIA ^ eM AT1|£A V 

academia ma qaMAL 

CONDUCCIOML | qaNAL. 

£ '"Solera GRAMADiMA 

^LCHOEERA GF.ANA_0.NA_ 

- "" TOTAL 1-^-A' 


registro oe factura. 

IMP0N1BLE TI^PG_ 

40,000 i2 j'\ 

40,000 ±Z 
50,000 1 

50,006 

100,000 i 
100,000 £ 
35,000 I 4 . 

35,000 
70,000 l£; 

70,000 ^ 

23,000 12/; 

23,000 

120,000 1 
120,000 
55,000 12--; 

55,000 

REPERCURT1D0: 


pagima 1 

EMITIDAS , 

CUOTA 

4,300 
2,000 
6,000 
2,500 
12,000 
5,000 
4,200 
1 ,750 

3.400 
3,500 
2,760 
1,150 

14.400 
6,000 
6,60 0 
2,750 

33,810 


Sombre de 
[period 0 : 


| a EHPBE SA! - 400W^ r '"- TlP o _ 

,—mbre b imponible nr. =005 

. octUBRE/OCTU _,1- 12 -/. 3,751 

Ul/lt 03221 --TOTAL I-';-”' * 




oecorac-iom 


p<A6lNA 

ambiente sa 


CUOTA 


OP OPTADO: 


del usuario inexperto el programa esta acom- 
panado por 10 paginas de instrucciones en las 
que se describe el manejo del mismo de prin- 
cipio a fin. 

En ellas se tocan todas las opciones y ope¬ 
raciones para conseguir el optimo rendimien- 
to del software con explicaciones concretes y 


La sencillez de manejo de las opciones y su 
natural reproduction de los procesos reales 
hace que su aprendizaje y posterior utilization 
no representen ningun impediment para al- 
guien que no haya tocado en su vida esa$ ma 
quinas diabolicas llamadas ordenadores. 

Como en todo este tipo de programas la ra- 
pidez y velocidad en el proceso de dates vie- 
ne dada por el numero de cuentas y apuntes 


trales no nos daran mas quebraderos de ca- 
beza, a los potentes ordenadores del fisco, el 
contribuyente puede oponer la informdtica do- 
mestica y veneer en la contienda de los nume- 
ros. 
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EXITOS AMSTRAD 

iSERAS CAPAZ DE PiLOTAR UN 'HARRIER'? f 





THE 

MUSIC SYSTEM 


I □□BDDIRQOIlEHkl 

!■ I BHBBEnHB 


iniltll 

lLlillilH 


m s 


ElrSSlrl^ 

THE. MUSIC SYSTEM 


li-HJ 


iTE GUSTARIAIR GANANDOLE 'PRENDAS' A SAMANTHA? 


harrier - disco □ cassette □ SAMANTHA FOX - Spectrum □ cas Amstrad n 

COLOSSUS - disco □ cassette □ 5. MUSICAL - Commodore □ cas. Amstrad □ disc. Amstrad □ 

NOMBRE Y APELUDOS:------ 

DIRECCION:_____CODICO POSTAL:__ 

POBLACION:____PROVINCIA:_____ 


HARRIER 

diSCO: 3.900 ptS. NA induido 
cassette: 2.500 pts. iva induido 


COLOSSUS CHESS - 

disco: 4,400 pts. IVA induido 
cassette: 2.500 pts. iva inciuido 


SIR 
F O 

1 K E 



< 



O*ve+oo»d tw Rod Hyde m 
oo oo-tai-on e».th ft Wt teicno* c* 

Can you meet 
the ultimate challenge? 


ATREVETE A ENFRENTAR AL COLOSSUS A OTRO JUEGO DE AJEDREZ 


SERNA 


CREATU PROPIA MUSICA 


RECORTA Y ENVIA ESTE CUPON A:<$>SERMA C/. BRAVO MURILLO, 377 - 3° A. 
28020 MADRID. TELS. 733 73 11 - 733 74 64 


CDS Software LTD 


AMSTRAD DISK 


SAMANTHA FOX • 


Spectrum: 1.995 pts, iva induido 
cas Amstrad: 1.995 pts. mmu 


SISTEMA MUSICAL - 


Commodore: 4.300 pts. iva induido 
Amstrad cas: 4.300 pts. iva induido 
Amstrad disco: 5.800 pts. mum 


FORMA DE PACO: TALON BANCARIO □ CONTRA REEMBOLSO □ 

















































































































DOMINE EL CODIGO 
MAQUINA 
EN SU AMSTRAD 


1 oda la gente que se interesa por el codi- 
go maquina, ha visto, aiguna vez, sus deseos 
rustrados por la «terrible complejidad», que 
aparentemente arrastra el aprendizaje de tan 
arido lenguaje, esto no es en absoluto cierto, 
y se debe a la poca vision que dan del codigo 
maquina algunos libros, que enseguida pro- 
fundizan en el mismo, dejando al lector total 
mente aturdido por la avalancha de rutinas, 
en su mayoria complejas, que intentan hacer 
comprender al, todavia, novato, poniendo a 
favor la, poco clara, simpiicidad de las mis- 
mas. 


Domv\e 

dC6dqoN\aqma 
ev\5\A 



. CPC 6125-664-464 


:iM CJFfDRD SCOTT VMU NT 

«£► ra-ma 


El libro de Gifford y Vincent intenfa corre- 
gir estas deficiencies, explicando sin grandes 
pretensiones, la manera de comenzar a pro- 
gramar en codigo maquina, su texto es facil 
de leer, dejando claros casi todos los concep¬ 
ts que vamos viendo a medida que avanza- 
mos. 

El prologo de los autores deja claro que es 
una gufa y como tal no se extiende demasia- 
do con cada nemctecnico, pero deja una vi¬ 
sion clara de lo que hacen, Algunos serdn di- 
ficiles de comprender en un principio, no im- 
porta, como todo costara un par de leefuras 
mas de todo el libro y esos conceotos queda- 
ran suficientemente claros. 

El comienzo del libro es una breve explica- 
cion de que es, para que sirve y como progra- 
mar codigo maquina, contando que son los sis- 
temas numericos, por que utilizarlos, que es 
el lenguaje ensamblador. Incluso nos propor- 
ciona una pequena muestra de los ensambla- 
dores disponibles para el Amstrad, casi to- 


dos publicados en Inglaterra, una lastima. Se- 
guimos avanzando dandole un breve repaso 
al hardware, las llamadas a subrutinas en md 
quina, y a todos los demas conceptos basicos 
del codigo maquina. 

Conviene resaltar el capitulo 8, ya gue esta 
dedicado a diccionario de terminos ae codi¬ 
go maquina, dando una completa explicacion 
de todos los registros, asi como de los nemo- 
tecnicos de la Z80. 

La explicacion de como manejar los bits en 
codigo maquina, esta hecha con gran clari- 
dad, dando una detallada explicacion de co¬ 
mo utilizer las instrucciones dedicadas al ma- 
nejo de los mismos que posee la Z80. 

Tenemos un capitulo dedicado a la panta- 
lla del Amstrad, en el cual se hecha de me- 
nos algo mas de extension, ya que se dedica 
a comentar como funciona muy escuetamen- 
te, dando al mismo tiempo una serie de lla¬ 
madas al firmware que apenas vienen a cuen- 
to. 

Pero nadie es perfect y esta claro que Gif¬ 
ford y Vincent no iban a ser una excepcion. 

Mas de la mifad del libro esta dedicado a 
los listados, en basic y ensamblador de diver- 
sas rutinas en codigo maquina en las cuales 
abundan las de pantalla tipicas, macrocarac- 
teres, giro de Prases a derecha e izquierda, 
compresores de pantalla. 

Hay que destacar la rurina para mover un 
bloque, ya sea graficos 0 texto, por la panfa- 
lla punto a punt, consiguiendo una suavidad 
de movimiento excepcional. 

Tambien se suministra un monitor de codi¬ 
go maquina, que nos permitira modificar la 
memoria a nuestro gusto. 

Estas rutinas se entregan como utilidades, 
sin ningun cinimo de que sean entendidas a la 
primera por el lector. 

Es un libro que merece la pena leer, ya que 
nos aclara bastantes concepros de una manera 
amena. 

Los aufores han conseguido que este sea un 
libro facil de entender que se lee rapidamen- 
te, algo que no es nada facil. 


ILO: EL 

31 GO MAQUINA 
SU AMSTRAD 
TORIAL: RAMA 
CIO: 2.200 


APRENDE LOGO 
CON AMSTRAD 

Logo es un lenguaje del que nos gustaria 
saber algo mas, ya que la informacion que nos 
suministra con nuestro ordenador es bastan- 
te deficiente, por eso no es de extrahar que 
cuando nos ponemos a ver libros de informa 
tica y encontramos uno relacionado con este 
lenguaje, se nos vayan los ojos detras suyo, 
esperando encontrar algo nuevo. 

Nosotros hemos encontrada algo muy nue¬ 
vo, Logo en Castellano. Un lenguaje como es¬ 
te, creaao y dedicaao a la educacion, no es 
muy adecuado que tenga las instrucciones pri¬ 
mitives en ingles, ya que los que no se lleven 
bien con dicha lengua, tendran muchas mas 
dificultades a la hora de intentar aprender Lo¬ 
go. 



Pensando en los pobres nihos a los que es- 
tamos intenfando ensenar a programar con es¬ 
te lenguaje, como se tienen que liar al inten¬ 
tar codificar un programa utilizando un idio- 
ma que no es el suyo, esto no es muy didacti- 
co que digamos. 

Bien, a Spen, S.A., se le ocurrio la idea de 
hacer que el Logo del Amstrad, porque no, 
estuviera en Castellano, esto se consigue me- 
diante una serie de primitivas definidas en un 
fichero. No es que sea algo muy complicado, 
pero a ellos se les ocurrio primero. 

El libro esta enfocado a los ninos, por tanto 
no se mete a explorar las multiples posibilida- 
des de este lenguaje, cosa que se le podia ocu- 
rrir a alguien, tal vez Amstrad Espana se 
digne a publicar la Guta de Logo que debie- 
ra acompanar al interprete suminisfrado con 
el ordenador. El libro no descubre nada que 
no sepa el que se haya letdo el manual. Pero 
al nino se le expiican daramente casi todas las 
primitivas, en castellano, de las que dispone- 
mos; es una magnifica gufa infantil de este len¬ 
guaje. 
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TITULO: A ^ R ^strAD 
LOGO CON AMSTRAU 

EDITORIAL: RAM* 

PRECIO: 2 650 


En definitive^ el nine puede aprender a ma 
nejor Logo con este libro, que fundamental- 
mente es de los que se trafa, el mayor puede 
aclorar algunos concepios oscuros, pero no 
creais que todos. 



Las primifivas de las cuales disponemos en 
Castellano son las siguientes: 


SI 

IF 

ATRAS 

BK 

IZQUIERDA 

LT 

DERECHA 

RT 

ADELANTE 

FD 

80RRAR 

PE 

EMPEZAR 

CS 

LISTAR 

POTS 

VER 

ST 

CARGAR 

LOAD 

SALVAR 

SAVE 

HAZ 

MAKE 

ESCRIBIR 

PR 

ESPACIO 

NODES 

UNE 

WORD 

AD!0S 

BYE 

PUNTO 

DOT 

SONIDO 

SOUND 

ALEATORIO 

RANDOM 

EDITAR 

ED 

ENTRADA 

RQ 

DIRECTQRIO 

DIR 

RbPETIR 

REPEAT 

CUENTA 

COUNT 

PLUMA-VISIBLE 

PD 

VER-TORTUGA 

ST 

ESCONDER TORTUGA 

MT 

BORRAR-VARIABLE 

ERN 

COLOR-TORTUGA 

SETPC 

PANTALLA-DE-GRAFICOS 

FS 

VUELVE-TORTUGA 

WRAP 

SSN-PRIMERA 

BF 

SIN-ULTIMA 

BL 

PANTALLA-DE-TEXTO 

TS 

LISTAR-PROCE'DiMI ENTO 

PO 

DEJAR-ESPACIO 

RECYCLE 


Aquellas que no encontremos no nos sera 
muy dificil implementarlas mediante la primi 
tiva adecuada. 

Podemos utilizar el Logo nativo de Ams- 
frad mezclado con el Logo Castellano, ya que 
no influye, al ser procedimientos, el que ha- 
iiomos cargado el Castellano. 

El libro viene repleto de ejercicios, solucio- 
nados y sin solucionar, que ayudan a una me- 
jor comprension de los conceptos en el expli- 
cados. Todos los ejemplos vienen acompona- 
dos por sus dibujos correspondientes, cosa que 
aciara mucho que es lo que hace esa tarea, 
una imogen... 


RUTIN AS EN COD I GO 
MAQUINA PARA 
SU AMSTRAD 

id codigo maquina es un tema sobre el que 
existen libros para todos los gustos y niveles. 
Desde los que comienzan mosfrando a! lector 
la definition de lo que es un bit, hasta los que 
en su segunda pagina poseen ya kilometricos 
listados de ensamblador y complicadas defi- 
niciones de firmware. 

Una de las cosas que uno ha de tener muy 
presente, dada la amplia gama de libros que 
como ya decimos existe sobre el tema, al com- 
prar un libro de codigo maquina es el nivel de 
conocimientos que posee y la utilizacion que 
va a hacer de el. 



EN CODIGO 
MAQUINA 

msi*id 


C*w GHfott) v Scrti™** 



No es lo mismo comprar un libro de lista¬ 
dos y subrutinas que nos ayuden a hacer mas 
rapidos nuestros programas en basic que com¬ 
prar un libro de codigo maquina con el deseo 
de aprender las regias por las cuales se rige 
su programacion. 

En el caso de este libro la eleccion esta muy 
dara; es recomendable a todo aquel que quie- 
ra aumentar la potencia de sus programas ba¬ 
sic, dandoles rapidez y efectos grancos que en 
basic es imposible conseguir. 


Desde la primera pagina el libro se compo- 
ne de interesantes subrutinas para el manejo 
de panfallas, sonido, etc. Algo de agradecer: 
las subrutinas vienen dadas primero en basic, 
introducienaolas en el ordenador mediante 
uno serie de pokes. 

Luego aparece el listado en ensamblador, 
con lo cual el lector que sienfa ese natural res- 
peto que todos sentimos al principio por estos 
listados puede eludirlos tranquilamente e in¬ 
troduce la subrutinas vienen dadas primero en 
basic, introduciendolas en el ordenador me¬ 
diante una serie de pokes. Luego aparece el 
listado en ensamblador, con lo cual el lector 
que sienta ese natural respeto que todos sen 
timos al principio por estos listados puede elu¬ 
dirlos tranquilamente e introducir la subrufi- 
na «pokeando» como ya dijimos antes. 

Por el contrario, el lector que sepa que la¬ 
bor desempena cada uno de los nemonicos y 
conozca bien los registros del Z-80 puede exa- 
minar los listados de ensamblador e intentar 
sacar algo en claro para las subrutinas que lue¬ 
go el mismo cree. 



Como ya hemos comentado, casi todas las 
subrutinas van dirigidas a hacer verdaderas 
maravillas con lo que tenemos en pantaNa. 

Una pequena muesfra de estas: inversor de 
pantalla, copiador de texfo, desplazamiento 
de texto, desplazamiento de bloques, explo¬ 
sion grafica, letras italicas, inclinadas, y, co¬ 
mo se suele decir un largo etc. 

En resumen, este libro pertenece a los que 
no tienen por intencion ensenarnos el codigo 
en si, sino darnos unas cuantas subrutinas para 
agilizar nuestros programas, tarea que desem¬ 
pena perfectamente. 

Por ultimo algo que deberfa ser trivial pero 
que por desgracia no lo es en algunas oca- 
siones, las subrutinas del libro funcionan. 
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Puede comparar cualquier programa GROTUR de 
15.000 ptas. con otros de 75.000 y 150.000 ptas. (que si- 
gue habiendolos) y se sorprendera. GROTUR es mas ra- 
pido, mas profesional y mas actual. Permite ademas, que 
Ud. haga cualquier cambio si lo ordena la Ley. 



t% 

Aft 



NUESTRO GABINETE TECNICO 
ESTA ABIERTO PARA 
REALIZARLE CUALQUIER 
MODIFICACION 0 CAMBIO 
QUE UD. ORDEWE 



k inf ormdticcf 
f GROTUR, S.A. 

TELF8. 474 M 00/32 - TELEX; I8SA 
C/. JAIME EL COHQUISTAOOR. tt 

(10 41 MADRID 


PARA 


PC COMPATIBLES Y AMSTRAD 

Programa 

Precio 


(Sin IVA) 

AJmacen+IVA . 

13.661 

Ciientes con etiquetas . 

7.679 

Clientes con etiquetas+historial . 

11.518 

Cuentas . 

7.679 

Facturacion ... 

13.661 

Facturacion y almacen .... 

16.875 

Libros del IVA . 

15.000 

Presupuestos . 

16.339 

Recibos . 

16.339 

Recibos automaticos . 

18.928 

Facturacion por albaranes . 

29.232 

Urbanizaciones . 

35.714 

Agentes comerciales . 

38.161 

Restaurantes . 

31.250 

Talleres . 

18.928 

Fabricacion . 

55.125 

Administracion de fincas ... 

42.000 

Contabilidad-Libros del IVA . 

26.600 

Medicos . 

47.900 

Creador de documentos con clientes . 

26.600 


Solo en grandes almacenes 
y tiendas especializadas 




































SU8CRIBETE 
FOR UN MO 
YPAGA SOLO 


Ahorrate 3.500ptas.: un 35%. 



AMSTRA D 


CUPON DE SUSCRIPCION 

Si, drseo suscribirme a la revista 
Amstrad Semanal per un aiio 
(50 numeros), al precio de 6.175 ptas., 
to quo me supone un aliorro de casi 
3.500 ptas. (oferta valida solo para 
Espaiia. hasta el 28 de febrero de 1987). 

Nombrc _ 


Apellidos 


Fecha de naeimiento 


Domicilio 


Localidad 

Frovine.ia 

Tftlefono 

C.P. 


Para agilizar tu envio, es importante que indiques el 
Codigo Postal. 

Forma dc pago: 

Talon a nombre de Hobby Press. S. A. 

Giro postal a notnbre de I lobby Press. S. A., n?_ 

□ Contra reembol^o (supone 100 ptas. mas de gastos dc envio 
y es valido solo para Espaiia). 

□ Mcdiante tarjeta de crcdito 

„• rrm rrm rrrn mr 

□ Visa □ Master Charge □ American Express 

Fecha de caducidad de la tarjeta___ 

Feeha y firma 


Tambien 

puedes 

suscribirte 

portelefono 

(91)7346500 



CUPON DE PEDIDO DE NUMEROS ATRASADOS 
YCINTAS SERIEORO. 

SI, dcseo redbir en mi domicilio losfiguienles rjcmplares do Amstrad Semanal, 
cuyos numeros indieo a contmuacion. a! precio dc 190 ptas. cada uno 
{in’dependicnteinentc del precio que aj)arc/ca en portada y de iu fecha de publication). 
Scparo con un guidn cada numcra_ 


Esta a got ado el niimero 4. 

Si compro mas dc side numeros recibire, lotalmentc gratis, una cinta de 
Your Computer. 

SI, drseo rccfblr en ini domidlio las cintas Serie Oro (|iie indieo a eonlimmc16n. 
al precio de 756 ptas. cada una. Cada cinta Neva grabados los programas publicados en 
cuairo numeros de la revisla 11 al 4.5 al 8.9 al 12. etc.). 

Numeros _ al _ Numeros ___ al _ 

Numeros _ al _ Numeros _ al _ 

Numeros _ al__ Numeros _ al _ 

Nombrc _____ 

Apcllfdos_ 

Fecha de nadmieiito___-_ 

Domicilio_ 

Localldad__ Irovlncla___ 

Tclrfono C.P._ 

Para agilizar tu envio, es importante que indiques el Codigo Postal. 

Forma de ptgrc 

U Mcdiante talon bancarlo a nombre de Hobby Press. S A, 

u Mcdiante giro postal a nombrc de Hobby Press, $. A.. n.°_ 

□ Contra rcembolso (supone 100 ptas. mas de gastos de envio y es vAlitlo sdlo para Esparta]. 

No se admiten solicitudes de cintas con pago contra reembolso. 

Fecha y firma 




































































Esta es la oferta del ano, 
todo un ano de AMSTRAD 
Semanal por solo 
6.175 ptas. 50 numeros 
que te salen a un precio 
increfble: 123 ptas. cada 
uno. 



i;mi 


nmimie 


Aprovechate. Una oferta 
asisolo sepresenta una 
vez a1 ano. 

(oferta valiria solo para Esparia. 
hasia cl 28 de lebrero de 1987). 
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Esta es la oferta del ano, 
todo un ano de AMSTRAD 
Semanal por solo 
6.175 ptas. 50 numeros 
que te salen a un precio 
increfble: 123 ptas. cada 
uno. 



Aprovechate. Una oferta 
asisolo se presenta una 
vez al ano. 


(oferta valida solo para Espafm. 
hasta cl 28 dc Icbrrro dc 19871. 
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Para gente iaquieta 
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